disable debugging window

svn: r9846
This commit is contained in:
Eli Barzilay 2008-05-15 14:56:05 +00:00
parent 93027509cf
commit fb65879c50

View File

@ -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))