From 404cf23fa99e6f1e072d5e04bfd0cae601b3e87e Mon Sep 17 00:00:00 2001 From: Christopher Schmidt Date: Fri, 15 Mar 2013 19:50:04 +0100 Subject: [PATCH] org.el: Use most general key bindings in orgstruct-mode * org.el (orgstruct-setup): Generalize key bindings. --- lisp/org.el | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/lisp/org.el b/lisp/org.el index a75bdfb42..f02a45590 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -8829,10 +8829,12 @@ buffer. It will also recognize item context in multiline items." ("" . "RET") ("" . "ESC") ("" . "DEL"))) - (setq binding (read-kbd-macro (replace-regexp-in-string - (regexp-quote (car rep)) - (cdr rep) - (key-description binding))))) + (setq binding (read-kbd-macro + (let ((case-fold-search)) + (replace-regexp-in-string + (regexp-quote (cdr rep)) + (car rep) + (key-description binding)))))) (let ((key (lookup-key orgstruct-mode-map binding))) (when (or (not key) (numberp key)) (condition-case nil