summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorStephen Berman <stephen.berman@gmx.net>2016-06-15 20:08:16 +0200
committerStephen Berman <stephen.berman@gmx.net>2016-06-15 20:08:16 +0200
commit5d4d8a3932f8867f79effeafa4c337b8e4208fe8 (patch)
tree6637618c5a6abe14bcaea21203f9f5199956061c
parentd7084f2260943287cdfb5e3021ac33aab6a14c6d (diff)
Improve last todo-mode fix
* lisp/calendar/todo-mode.el (todo-read-category): Use set-keymap-parent instead of copy-keymap, and default (as previously) to the global binding (for rationale, see http://lists.gnu.org/archive/html/emacs-devel/2016-06/msg00217.html).
-rw-r--r--lisp/calendar/todo-mode.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/calendar/todo-mode.el b/lisp/calendar/todo-mode.el
index f0d4bc5961..7cfec137b0 100644
--- a/lisp/calendar/todo-mode.el
+++ b/lisp/calendar/todo-mode.el
@@ -5751,8 +5751,9 @@ against categories in that file; otherwise complete against all
categories from `todo-category-completions-files'."
;; Allow SPC to insert spaces, for adding new category names.
(let ((minibuffer-local-completion-map
- (copy-keymap minibuffer-local-completion-map)))
- (define-key minibuffer-local-completion-map " " 'self-insert-command)
+ (let ((map (make-sparse-keymap)))
+ (set-keymap-parent map minibuffer-local-completion-map)
+ (define-key map " " nil))))
(let* ((add (eq match-type 'add))
(archive (eq match-type 'archive))
(file0 (when (and file (> (length todo-files) 1))