--- a/PopUpMenu.st	Thu Oct 31 15:44:26 2002 +0100
+++ b/PopUpMenu.st	Thu Oct 31 15:49:56 2002 +0100
@@ -991,7 +991,6 @@
      This is the ST-80 way of launching a menu."
 
     defaultHideOnRelease := false.
-'def startUpWithHeading:' print. defaultHideOnRelease printCR.
     menuView labels notNil ifTrue:[
         menuView labels:(Array with:aString with:'=') , menuView labels.
     ].
@@ -1029,7 +1028,6 @@
      if the menu should be hidden when the button is released"
 
     defaultHideOnRelease := aBoolean.
-'def hideOnRelease:' print. defaultHideOnRelease printCR.
     menuView hideOnRelease:aBoolean
 
     "Modified: 9.2.1996 / 02:06:15 / cg"
@@ -1316,7 +1314,6 @@
         and:[y < (height-margin)]]]) ifTrue:[
             "/ inside my menuView
             hideOnRelease := true.
-'motion ' print. hideOnRelease printCR.
             p := device 
                     translatePoint:(x @ y)
                     fromView:self
@@ -1350,7 +1347,6 @@
 
 buttonPress:button x:x y:y
     hideOnRelease := true.
-'press ' print. hideOnRelease printCR.
 
     ((x >= 0) and:[x < width]) ifTrue:[
         ((y >= 0) and:[y < height]) ifTrue:[
@@ -1375,7 +1371,6 @@
         millisecondTimeDeltaBetween:(Time millisecondClockValue)
                                 and:mapTime) > (self class maxClickTimeToStayOpen) ifFalse:[
         hideOnRelease := false.
-'release ' print. hideOnRelease printCR.
     ].
 
     hideOnRelease ifFalse:[
@@ -1495,7 +1490,6 @@
         self borderWidth:bw
     ].
     defaultHideOnRelease := styleSheet at:#'popup.hideOnRelease' default:true.
-'def initStyle' print. defaultHideOnRelease printCR.
 !
 
 initialize
@@ -1591,11 +1585,10 @@
     menuView deselectWithoutRedraw.
     super realize.
     hideOnRelease := defaultHideOnRelease.
-'realize ' print. hideOnRelease printCR.
 ! !
 
 !PopUpMenu class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/PopUpMenu.st,v 1.92 2002-10-31 14:44:26 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/PopUpMenu.st,v 1.93 2002-10-31 14:49:56 cg Exp $'
 ! !