diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2016-07-29 15:58:08 +0200 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2016-07-29 16:00:07 +0200 |
commit | d2de890d3e6a77b52f554fca6e6f6f6953215921 (patch) | |
tree | d928e62071371a2eb104a3cff7abaaac08a62193 | |
parent | 02de57b597b75f85dcf365b9b1217219a11e7e66 (diff) | |
download | org-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.el | 8 |
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))))))))) |