Browse Source

Remember: Make sure the buffer to check for completion stuff exist

Carsten Dominik 15 years ago
parent
commit
8cde7ed412
2 changed files with 9 additions and 2 deletions
  1. 5 0
      lisp/ChangeLog
  2. 4 2
      lisp/org-remember.el

+ 5 - 0
lisp/ChangeLog

@@ -1,3 +1,8 @@
+2009-11-04  Carsten Dominik  <carsten.dominik@gmail.com>
+
+	* org-remember.el (org-remember-apply-template): Make sure the
+	buffer exists.
+
 2009-11-03  Carsten Dominik  <carsten.dominik@gmail.com>
 
 	* org.el (org-tab-ind-state): New variable.

+ 4 - 2
lisp/org-remember.el

@@ -588,12 +588,14 @@ to be run from that hook to function properly."
 		   (pall (concat prop "_ALL"))
 		   (allowed
 		    (with-current-buffer
-			(or (find-buffer-visiting file) (current-buffer))
+			(or (find-buffer-visiting file)
+			    (find-file-noselect file))
 		      (or (cdr (assoc pall org-file-properties))
 			  (cdr (assoc pall org-global-properties))
 			  (cdr (assoc pall org-global-properties-fixed)))))
 		   (existing (with-current-buffer
-				 (get-buffer (file-name-nondirectory file))
+				 (or (find-buffer-visiting file)
+				     (find-file-noselect file))
 			       (mapcar 'list (org-property-values prop))))
 		   (propprompt (concat "Value for " prop ": "))
 		   (val (if allowed