Browse Source

Don't bind S-iso-lefttab in XEmacs

Carsten Dominik 15 năm trước cách đây
mục cha
commit
6671877fa6
1 tập tin đã thay đổi với 6 bổ sung4 xóa
  1. 6 4
      lisp/org-table.el

+ 6 - 4
lisp/org-table.el

@@ -3510,10 +3510,12 @@ to execute outside of tables."
       (orgtbl-make-binding 'org-table-previous-field 104
 			   [(shift tab)] [(tab)] "\C-i"))
 
-    (org-defkey orgtbl-mode-map [S-iso-lefttab]
-      (orgtbl-make-binding 'org-table-previous-field 107
-			   [S-iso-lefttab] [backtab] [(shift tab)]
-			   [(tab)] "\C-i"))
+
+    (unless (featurep 'xemacs)
+      (org-defkey orgtbl-mode-map [S-iso-lefttab]
+         (orgtbl-make-binding 'org-table-previous-field 107
+			      [S-iso-lefttab] [backtab] [(shift tab)]
+			      [(tab)] "\C-i")))
 
     (org-defkey orgtbl-mode-map [backtab]
       (orgtbl-make-binding 'org-table-previous-field 108