--- a/StandardSystemView.st Mon Dec 09 11:43:40 2002 +0100
+++ b/StandardSystemView.st Tue Dec 10 12:04:55 2002 +0100
@@ -554,25 +554,6 @@
"Modified: 18.4.1996 / 14:55:44 / cg"
! !
-!StandardSystemView methodsFor:'accessing - channels'!
-
-labelChannel
- "return the labelChannel - or nil"
-
- ^ labelChannel.
-!
-
-labelChannel:aValueHolder
- "set the labelChannel - a valueHolder holding a string
- which is shown as title bar"
-
- |prev|
-
- prev := labelChannel.
- labelChannel := aValueHolder.
- self setupChannel:aValueHolder for:nil withOld:prev.
-! !
-
!StandardSystemView methodsFor:'accessing-behavior'!
bePartner
@@ -660,6 +641,25 @@
"
! !
+!StandardSystemView methodsFor:'accessing-channels'!
+
+labelChannel
+ "return the labelChannel - or nil"
+
+ ^ labelChannel.
+!
+
+labelChannel:aValueHolder
+ "set the labelChannel - a valueHolder holding a string
+ which is shown as title bar"
+
+ |prev|
+
+ prev := labelChannel.
+ labelChannel := aValueHolder.
+ self setupChannel:aValueHolder for:nil withOld:prev.
+! !
+
!StandardSystemView methodsFor:'accessing-dimensions'!
maxExtent
@@ -1531,7 +1531,7 @@
!StandardSystemView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/StandardSystemView.st,v 1.143 2002-10-17 11:27:04 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/StandardSystemView.st,v 1.144 2002-12-10 11:04:55 cg Exp $'
! !
StandardSystemView initialize!