disable debugging window

svn: r9846 original commit: fb65879c5042d9d4334790fd293305988422cf4b
2008-05-15 14:56:05 +00:00 · 2008-05-15 14:56:05 +00:00 · 266fd38fb1
commit 266fd38fb1
parent c693c894cc
1 changed files with 2 additions and 2 deletions
--- a/collects/mrlib/switchable-button.ss
+++ b/collects/mrlib/switchable-button.ss
@ -285,7 +285,7 @@
           (send bdc set-bitmap #f)
           disable-bm))))

-
+#;
 (begin
  (define f (new frame% [label ""]))
  (define vp (new vertical-pane% [parent f]))
@ -319,4 +319,4 @@
          (λ (a b)
            (send sb enable (not (send sb is-enabled?)))
            (send b1 enable (not (send b1 is-enabled?))))]))
-  (send f show #t))
+  (send f show #t))