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

[profile] / dot / emacs

diff --git a/dot/emacs b/dot/emacs
index f4097922405c7a39ef76228de96b3f2c1b950aeb..6b150667b5eb57c565c2ce5720ac7f6094203ef6 100644 (file)
--- a/dot/emacs
+++ b/dot/emacs
@@ -466,6 +466,8 @@
 (setq windmove-wrap-around t)
 (trap (iswitchb-mode))
 (progn
 (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)
   (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)