--- a/PullDMenu.st	Wed Mar 06 18:03:26 1996 +0100
+++ b/PullDMenu.st	Wed Mar 06 18:07:50 1996 +0100
@@ -809,7 +809,7 @@
         (keepMenu and:[m notNil]) ifTrue:[
             device grabPointerInView:self.
 device grabKeyboardInView:self.
-            self cursor:Cursor upRightArrow
+"/            self cursor:Cursor upRightArrow
         ]
     ] ifFalse:[
         (keepMenu and:[toggleKeep not]) ifTrue:[
@@ -839,7 +839,7 @@
         self hideActiveMenu
     ]
 
-    "Modified: 1.3.1996 / 13:20:20 / cg"
+    "Modified: 6.3.1996 / 17:14:16 / cg"
 !
 
 buttonRelease:button x:x y:y
@@ -979,10 +979,10 @@
     aBoolean ifTrue:[
         device ungrabKeyboard.
         device ungrabPointer. 
-        self cursor:Cursor normal
+"/        self cursor:Cursor normal
     ].
 
-    "Modified: 5.3.1996 / 17:41:46 / cg"
+    "Modified: 6.3.1996 / 17:14:21 / cg"
 !
 
 pullMenu:aNumber
@@ -1027,10 +1027,10 @@
     keepMenu ifTrue:[
         device grabPointerInView:self.
         device grabKeyboardInView:self.
-        self cursor:Cursor upRightArrow
+"/        self cursor:Cursor upRightArrow
     ]
 
-    "Modified: 5.3.1996 / 17:41:53 / cg"
+    "Modified: 6.3.1996 / 17:14:27 / cg"
 ! !
 
 !PullDownMenu methodsFor:'initialize / release'!
@@ -1341,5 +1341,5 @@
 !PullDownMenu class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Attic/PullDMenu.st,v 1.38 1996-03-05 16:42:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/PullDMenu.st,v 1.39 1996-03-06 17:07:50 cg Exp $'
 ! !