--- a/VariablePanel.st Fri Jan 16 16:29:23 1998 +0100
+++ b/VariablePanel.st Sat Jan 17 14:47:28 1998 +0100
@@ -1124,19 +1124,16 @@
!VariablePanel methodsFor:'enumerating subviews'!
changeSequenceOrderFor:aSubView to:anIndex
- "change a subview's position into subviews collection
+ "change a subview's position in the subviews collection.
"
|success|
success := super changeSequenceOrderFor:aSubView to:anIndex.
-
success ifTrue:[
self setupSubviews.
self resizeSubviews.
].
^ success
-
-
! !
!VariablePanel methodsFor:'event handling'!
@@ -1517,5 +1514,5 @@
!VariablePanel class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/VariablePanel.st,v 1.37 1997-11-03 15:29:08 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/VariablePanel.st,v 1.38 1998-01-17 13:47:28 cg Exp $'
! !