original commit: a69382206f1115992945e0f2398ac65ada8e289b
This commit is contained in:
Matthew Flatt 2005-02-22 13:23:29 +00:00
parent 43dbaa5bcf
commit 7c976eb0a8

View File

@ -206,7 +206,7 @@
[(unix) (format "~a~a"
(case x-prefix
[(meta) ":m:"]
[(alt) ":a:"]
[(alt) ":m:"]
[(ctl-m) ":c:m;:"]
[(ctl) ":c:"])
(char-name (char-downcase shortcut) #f))]