SimpleView.st
changeset 5555 74bcd9744218
parent 5551 7574a9f6f7a3
child 5557 9028b831a288
--- a/SimpleView.st	Wed Feb 03 19:14:54 2010 +0100
+++ b/SimpleView.st	Thu Feb 04 11:30:18 2010 +0100
@@ -2860,7 +2860,7 @@
 
     "/ notice, the position-dependent query: if there is a higher secondary screen,
     "/ this makes a difference in where a popUpMenu is allowed...
-    ((top + height) > (devBot := (device usableHeightAt:(left@top)))) ifTrue:[
+    ((top + height) > (devBot := (device usableHeightAt:(left@top))-2)) ifTrue:[
         newTop := devBot - height
     ].
     ((left + width) > (devRight := device usableWidth)) ifTrue:[
@@ -10598,11 +10598,11 @@
 !SimpleView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.657 2010-02-03 17:28:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.658 2010-02-04 10:30:18 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.657 2010-02-03 17:28:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.658 2010-02-04 10:30:18 cg Exp $'
 ! !
 
 SimpleView initialize!