hidden name message should simply not draw

original commit: 6e977d7c20787cad4594df663525d3eb4310231f
2010-07-29 09:40:39 -06:00 · 2010-07-29 09:40:39 -06:00 · 55bbadee9c
commit 55bbadee9c
parent b9ca725b7d
1 changed files with 1 additions and 0 deletions
--- a/collects/mrlib/name-message.rkt
+++ b/collects/mrlib/name-message.rkt
@ -185,6 +185,7 @@
        (let-values ([(w h) (get-client-size)])
          (cond
            [hidden? 
+             #;
             (let ([pen (send dc get-pen)]
                   [brush (send dc get-brush)])
               (send dc set-brush (send the-brush-list find-or-create-brush (get-panel-background) 'panel))