--- a/ListModelView.st	Tue Oct 07 21:14:32 2003 +0200
+++ b/ListModelView.st	Wed Oct 08 17:35:44 2003 +0200
@@ -490,7 +490,7 @@
 
     nLines == 0 ifTrue:[^ self ].
     self listSizeChanged:start nLines:nLines.
-    shown not ifTrue:[^ self].
+    shown ifFalse:[^ self].
 
     newSz := startOfLinesY size + nLines.
 
@@ -591,7 +591,7 @@
     ].
 
     self listSizeChanged:start nLines:(size negated).
-    shown not ifTrue:[^ self].
+    shown ifFalse:[^ self].
 
     newSz := startOfLinesY size - size.
 
@@ -1651,7 +1651,7 @@
 !ListModelView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/ListModelView.st,v 1.82 2003-10-07 19:14:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/ListModelView.st,v 1.83 2003-10-08 15:35:03 cg Exp $'
 ! !
 
 ListModelView initialize!

--- a/MenuPanel.st	Tue Oct 07 21:14:32 2003 +0200
+++ b/MenuPanel.st	Wed Oct 08 17:35:44 2003 +0200
@@ -2528,9 +2528,10 @@
     (shown and:[w ~~ 0]) ifFalse:[^ self].
 
     mustRearrange ifTrue:[
-        self isPopUpView not ifTrue:[explicitExtent := true].
+        self isPopUpView ifFalse:[explicitExtent := true].
         self rearrangeItems.
-      ^ self invalidate
+        self invalidate.
+        ^ self
     ].
     self paint:(self viewBackground).
     self clearRectangleX:x y:y width:w height:h.
@@ -7392,7 +7393,7 @@
 !MenuPanel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.370 2003-08-12 10:52:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.371 2003-10-08 15:35:44 cg Exp $'
 ! !
 
 MenuPanel initialize!