[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Orgmode] [PATCH] Fix a bug in the remember properties escape
From: |
James TD Smith |
Subject: |
[Orgmode] [PATCH] Fix a bug in the remember properties escape |
Date: |
Mon, 17 Nov 2008 20:56:26 +0000 |
Calling org-property-get-allowed-values with the point not on an item
resulted in an error.
This patch is available from my git repository, in the branch
remember-properties-fix.
---
lisp/ChangeLog | 6 ++++++
lisp/org-remember.el | 5 ++++-
2 files changed, 10 insertions(+), 1 deletions(-)
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 53a21fd..3690659 100755
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2008-11-17 James TD Smith <address@hidden>
+
+ * org-remember.el (org-remember-apply-template): The call to
+ `org-property-get-allowed-values' failed if the point in the
+ target file was not on a headline.
+
2008-11-17 Carsten Dominik <address@hidden>
* org-colview.el (org-columns-display-here): New argument
diff --git a/lisp/org-remember.el b/lisp/org-remember.el
index 5d99ba3..9026489 100644
--- a/lisp/org-remember.el
+++ b/lisp/org-remember.el
@@ -504,7 +504,10 @@ to be run from that hook to function properly."
((prop (substring-no-properties prompt))
(allowed (with-current-buffer
(get-buffer (file-name-nondirectory file))
- (org-property-get-allowed-values nil prop 'table)))
+ (save-excursion
+ (if (not (org-at-heading-p))
+ (re-search-forward
org-complex-heading-regexp))
+ (org-property-get-allowed-values nil prop
'table))))
(existing (with-current-buffer
(get-buffer (file-name-nondirectory file))
(mapcar 'list (org-property-values prop))))
--
1.5.6.5
- [Orgmode] [PATCH] Fix a bug in the remember properties escape,
James TD Smith <=