Browse Source

org-src.el: Fix bug: the S-TAB key should not trigger a native TAB command.

* org-src.el (org-src-native-tab-command-maybe): Fix bug: the
S-TAB key should not trigger a native TAB command.
Bastien Guerry 13 years ago
parent
commit
570ecb4e31
1 changed files with 1 additions and 0 deletions
  1. 1 0
      lisp/org-src.el

+ 1 - 0
lisp/org-src.el

@@ -830,6 +830,7 @@ issued in the language major mode buffer."
 Alter code block according to effect of TAB in the language major
 Alter code block according to effect of TAB in the language major
 mode."
 mode."
   (and org-src-tab-acts-natively
   (and org-src-tab-acts-natively
+       (not (equal this-command 'org-shifttab))
        (let ((org-src-strip-leading-and-trailing-blank-lines nil))
        (let ((org-src-strip-leading-and-trailing-blank-lines nil))
 	 (org-babel-do-key-sequence-in-edit-buffer (kbd "TAB")))))
 	 (org-babel-do-key-sequence-in-edit-buffer (kbd "TAB")))))