From: YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
Date: Thu, 24 Nov 2005 08:18:37 +0000 (+0000)
Subject: Make modifier `ctrl' an alias of `control'.
X-Git-Tag: emacs-pretest-22.0.90~5700
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d8dabccce2aaa0a35691746a1485d4fb353d4fb8;p=emacs.git

Make modifier `ctrl' an alias of `control'.
---

diff --git a/lisp/term/mac-win.el b/lisp/term/mac-win.el
index c15e0d7e1e5..e83734bfe33 100644
--- a/lisp/term/mac-win.el
+++ b/lisp/term/mac-win.el
@@ -1085,6 +1085,9 @@ XConsortium: rgb.txt,v 10.41 94/02/20 18:39:36 rws Exp")
 (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