www

commit b50316679a03e82eddf863aed38dc79fc1edcc65
parent dedcef50a2ba56959d87e1d3273184ed677544b3
Author: Ryan Culpepper <ryanc@racket-lang.org>
Date:   Thu, 11 Nov 2010 18:59:25 -0700

macro-stepper: map "s" and "h" keys to show and hide selected identifier

original commit: 7dcd0d408c2d7e6f7034320f30280c799fa25416

Diffstat:
M
collects/macro-debugger/view/extensions.rkt
 | 
4
++++

1 file changed, 4 insertions(+), 0 deletions(-)
diff --git a/collects/macro-debugger/view/extensions.rkt b/collects/macro-debugger/view/extensions.rkt
@@ -19,6 +19,7 @@
     (inherit-field config
                    controller)
     (inherit add-function
+             map-function
              call-function)
 
     (define show-macro #f)
@@ -29,6 +30,9 @@
     (define/public (get-hiding-panel)
       (send/i macro-stepper widget<%> get-macro-hiding-prefs))
 
+    (map-function ":s" "hiding:show-macro")
+    (map-function ":h" "hiding:hide-macro")
+
     (add-function "hiding:show-macro"
                   (lambda (i e)
                     (send*/i (get-hiding-panel) hiding-prefs<%>