浏览代码

org.el: Disable orgstruct-mode when falling back to original command

* org.el (orgstruct-make-binding):
Disable orgstruct-mode on fallback.
Christopher Schmidt 12 年之前
父节点
当前提交
7c27e57c4c
共有 1 个文件被更改,包括 2 次插入1 次删除
  1. 2 1
      lisp/org.el

+ 2 - 1
lisp/org.el

@@ -8672,7 +8672,8 @@ should be checked in for a command to execute outside of tables."
                                          'item-body)))
                                          'item-body)))
                 (org-run-like-in-org-mode ',fun)
                 (org-run-like-in-org-mode ',fun)
                 t))
                 t))
-          (let ((binding (let ((orgstruct-mode)) (key-binding ,key))))
+          (let* ((orgstruct-mode)
+		 (binding (key-binding ,key)))
             (if (keymapp binding)
             (if (keymapp binding)
                 (set-temporary-overlay-map binding)
                 (set-temporary-overlay-map binding)
               (call-interactively
               (call-interactively