diff options
| author | Bastien Guerry <bzg@altern.org> | 2012-09-22 11:08:20 +0200 |
|---|---|---|
| committer | Bastien Guerry <bzg@altern.org> | 2012-09-22 11:08:20 +0200 |
| commit | 1fc19ce5bc127f2f1ab00718f829656daec3b328 (patch) | |
| tree | 844e076b59061cddd470063b05e6bc6c575d8df5 | |
| parent | e1c609c6aa84b6d72ffe0946d58043cc00421666 (diff) | |
| download | org-mode-1fc19ce5bc127f2f1ab00718f829656daec3b328.tar.gz | |
org-capture.el (org-capture-fill-template): Fix checking of protected template entries
* org-capture.el (org-capture-fill-template): Fix checking of
protected template entries.
Thanks to Myles English for spotting this.
| -rw-r--r-- | lisp/org-capture.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/org-capture.el b/lisp/org-capture.el index 79e5a5d..49ab60c 100644 --- a/lisp/org-capture.el +++ b/lisp/org-capture.el @@ -1486,7 +1486,7 @@ The template may still contain \"%?\" for cursor positioning." ;; Interactive template entries (goto-char (point-min)) (while (and (re-search-forward "%^\\({\\([^}]*\\)}\\)?\\([gGtTuUCLp]\\)?" nil t) - (not (get-text-property (point) 'org-protected))) + (not (get-text-property (1- (point)) 'org-protected))) (unless (org-capture-escaped-%) (setq char (if (match-end 3) (match-string-no-properties 3)) prompt (if (match-end 2) (match-string-no-properties 2))) |