summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Goaziou <mail@nicolasgoaziou.fr>2016-07-29 15:58:08 +0200
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2016-07-29 16:00:07 +0200
commitd2de890d3e6a77b52f554fca6e6f6f6953215921 (patch)
treed928e62071371a2eb104a3cff7abaaac08a62193
parent02de57b597b75f85dcf365b9b1217219a11e7e66 (diff)
downloadorg-mode-d2de890d3e6a77b52f554fca6e6f6f6953215921.tar.gz
org-capture: Remove history for template completion
* lisp/org-capture.el (org-capture-fill-template): Remove history variable, which is not strictly necessary and relies, in its current implementation, on dynamic binding.
-rw-r--r--lisp/org-capture.el8
1 files changed, 2 insertions, 6 deletions
diff --git a/lisp/org-capture.el b/lisp/org-capture.el
index 925664d..23eae53 100644
--- a/lisp/org-capture.el
+++ b/lisp/org-capture.el
@@ -1701,11 +1701,7 @@ The template may still contain \"%?\" for cursor positioning."
(end (copy-marker (match-end 0)))
(prompt (nth 0 items))
(default (nth 1 items))
- (completions (nthcdr 2 items))
- (histvar
- (intern
- (concat "org-capture-template-prompt-history::"
- (or prompt "")))))
+ (completions (nthcdr 2 items)))
(unless (org-capture-escaped-%)
(delete-region beg end)
(set-marker beg nil)
@@ -1768,7 +1764,7 @@ The template may still contain \"%?\" for cursor positioning."
(concat (or prompt "Enter string")
(and default (format " [%s]" default))
": ")
- completions nil nil nil histvar default)
+ completions nil nil nil nil default)
strings)
(insert (car strings)))))))))