dot/emacs, el/dot-emacs.el: Defeat `keyboard-escape-quit'.

[profile] / dot / emacs

diff --git a/dot/emacs b/dot/emacs
index 1550b13..6b15066 100644 (file)
--- a/dot/emacs
+++ b/dot/emacs
@@ -466,6 +466,8 @@
 (setq windmove-wrap-around t)
 (trap (iswitchb-mode))
 (progn
+  (global-set-key [?\e ?\e] 'mdw-wrong)
+  (global-set-key [?\e ?\C-\] ?\C-\]] 'keyboard-escape-quit)
   (global-set-key [?\C-x ?w left] 'windmove-left)
   (global-set-key [?\C-x ?w ?h] 'windmove-left)
   (global-set-key [?\C-x ?w up] 'windmove-up)
@@ -586,11 +588,11 @@
                ("@BASH@" . sh-mode)
                ("@PYTHON@" . python-mode)
                ("@PERL@" . cperl-mode)
-               ("/perl" . cperl-mode)
+               ("perl" . cperl-mode)
                ("@TCLSH@" . tcl-mode)
                ("@WISH@" . tcl-mode)
-               ("/tclsh" . tcl-mode)
-               ("/wish" . tcl-mode))
+               ("tclsh" . tcl-mode)
+               ("wish" . tcl-mode))
              interpreter-mode-alist))
 
 (setq completion-ignored-extensions