add map-command-as-meta-key

svn: r6851 original commit: bee6910cdad71d2b4a504d87830bf43dae796954
2007-07-08 02:05:08 +00:00 · 2007-07-08 02:05:08 +00:00 · 9e9e55a0b7
commit 9e9e55a0b7
parent 33cd625a3d
3 changed files with 3 additions and 0 deletions
--- a/collects/mred/mred-sig.ss
+++ b/collects/mred/mred-sig.ss
@ -118,6 +118,7 @@
     list-control<%>
     make-eventspace
     make-namespace-with-mred
+     map-command-as-meta-key
     menu%
     menu-bar%
     menu-control-font
--- a/collects/mred/mred.ss
+++ b/collects/mred/mred.ss
@ -150,6 +150,7 @@
 	     snip-class-list<%>
 	     special-control-key
 	     special-option-key
+             map-command-as-meta-key
 	     label->plain-label
 	     string-snip%
 	     style<%>
--- a/collects/mred/private/kernel.ss
+++ b/collects/mred/private/kernel.ss
@ -1536,6 +1536,7 @@
  (define-functions
    special-control-key
    special-option-key
+    map-command-as-meta-key
    application-file-handler
    application-quit-handler
    application-about-handler