bind ESC to apply meta!

META is more important than CONTROL, since, for example, M-x is most
conveniently input using META-x.  With M-x, one can literally input
any command we want, so it is per chance the most important modifier,
after all.

1 files changed, 2 insertions, 2 deletions

diff --git a/basic.el b/basic.el
index cd5fdff..b5af371 100644
--- a/basic.el
+++ b/basic.el
@@ -452,8 +452,8 @@ window horizontally."
 ;;; Escape triggers super
 
 (define-key input-decode-map (vector 27) nil)
-(define-key input-decode-map (vector 27) #'event-apply-control-modifier)
-(define-key key-translation-map (vector 27) #'event-apply-control-modifier)
+(define-key input-decode-map (vector 27) #'event-apply-meta-modifier)
+(define-key key-translation-map (vector 27) #'event-apply-meta-modifier)
 
 ;;; Don't ask me to confirm!