changeset 67099:6c0071d00d11

Make modifier `ctrl' an alias of `control'.
author YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
date Thu, 24 Nov 2005 08:18:37 +0000
parents 8eabc94541ad
children e58128155819
files lisp/term/mac-win.el
diffstat 1 files changed, 3 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/term/mac-win.el	Thu Nov 24 08:18:17 2005 +0000
+++ b/lisp/term/mac-win.el	Thu Nov 24 08:18:37 2005 +0000
@@ -1085,6 +1085,9 @@
 (put 'return 'ascii-character ?\C-m)
 (put 'escape 'ascii-character ?\e)
 
+;; Modifier name `ctrl' is an alias of `control'.
+(put 'ctrl 'modifier-value (get 'control 'modifier-value))
+
 
 ;;;; Script codes and coding systems
 (defconst mac-script-code-coding-systems