VariablePanelController.st
changeset 2239 31a57c0002a2
parent 2236 cd77d04c9a0a
child 2245 e561458f9232
--- a/VariablePanelController.st	Fri Aug 25 11:30:03 2000 +0200
+++ b/VariablePanelController.st	Fri Aug 25 11:41:15 2000 +0200
@@ -78,7 +78,7 @@
         entered ~~ (saveCursor notNil) ifTrue:[
             entered ifTrue:[
                 saveCursor := view cursor.
-                view cursor:(Cursor normal).
+                view cursor:(Cursor hand).
             ] ifFalse:[
                 view cursor:saveCursor.
                 saveCursor := nil.
@@ -395,8 +395,8 @@
             isMax := x > (layout right - (layout width//3)).
             isMin := x < (layout left + (layout width//3)).
         ] ifFalse:[
-            isMax := y > (layout bottom - (layout height//3)).
-            isMin := y < (layout top + (layout height//3)).
+            isMin := y > (layout bottom - (layout height//3)).
+            isMax := y < (layout top + (layout height//3)).
         ].
         handle objectAttributeAt:#snapPart  put:(isMin ifTrue:[#left] ifFalse:[ isMax ifTrue:[#right] ifFalse:[#middle]]).
         doRememberPosition := (isMin or:[isMax]) and:[prvRCorner isNil].
@@ -464,7 +464,7 @@
 !VariablePanelController class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/VariablePanelController.st,v 1.28 2000-08-23 20:54:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/VariablePanelController.st,v 1.29 2000-08-25 09:41:15 cg Exp $'
 
 
 ! !