From e8023dde58f267a525b63184ec07d371b5a4c8b5 Mon Sep 17 00:00:00 2001 From: Carsten Dominik Date: Sun, 8 Sep 2013 07:33:18 +0200 Subject: [PATCH] Turn off replacing of disputed keys for the read-date keymap * lisp/org.el (org-read-date-minibuffer-local-map): Don't replace disputed keys when defining this keymap. (org-read-date: Remove unnecessary binding of `org-replace-disputed-keys'. This original fix did not work, thanks to Miro Bezjak for showing what the proper fix should be. --- lisp/org.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/org.el b/lisp/org.el index 77662774f..b7d97b076 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -16120,7 +16120,8 @@ So these are more for recording a certain time/date." (defvar org-read-date-inactive) (defvar org-read-date-minibuffer-local-map - (let ((map (make-sparse-keymap))) + (let* ((org-replace-disputed-keys nil) + ((map (make-sparse-keymap)))) (set-keymap-parent map minibuffer-local-map) (org-defkey map (kbd ".") (lambda () (interactive) @@ -16280,7 +16281,6 @@ user." (calendar-current-date)))) (org-eval-in-calendar nil t) (let* ((old-map (current-local-map)) - (org-replace-disputed-keys nil) (map (copy-keymap calendar-mode-map)) (minibuffer-local-map (copy-keymap org-read-date-minibuffer-local-map))) -- 2.11.4.GIT