diff options
author | Stephen Berman <stephen.berman@gmx.net> | 2016-06-15 20:08:16 +0200 |
---|---|---|
committer | Stephen Berman <stephen.berman@gmx.net> | 2016-06-15 20:08:16 +0200 |
commit | 5d4d8a3932f8867f79effeafa4c337b8e4208fe8 (patch) | |
tree | 6637618c5a6abe14bcaea21203f9f5199956061c | |
parent | d7084f2260943287cdfb5e3021ac33aab6a14c6d (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.el | 5 |
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)) |