--- a/UISelectionPanel.st Mon Mar 06 09:49:20 2006 +0100
+++ b/UISelectionPanel.st Mon Mar 06 09:49:27 2006 +0100
@@ -1628,6 +1628,30 @@
"Modified: / 18.3.1999 / 18:29:19 / stefan"
! !
+!UISelectionPanel methodsFor:'initialization'!
+
+initialize
+ |holder|
+
+ super initialize.
+
+ userClass := UserClass.
+ userSpecs := UserSpecs.
+ userLabels := UserLabels.
+
+ gallery := UIGalleryView new.
+
+ gallery model:(ValueHolder new).
+ gallery listHolder:(ValueHolder new).
+ gallery minorKeysHolder:(ValueHolder new).
+ gallery menuSelector:#raiseMenu.
+
+ gallery clientSpecHolder:(holder := ValueHolder new).
+ holder addDependent:self.
+
+ majorSelection := 0.
+! !
+
!UISelectionPanel methodsFor:'queries'!
canPaste:something
@@ -1712,30 +1736,9 @@
"Modified: 28.7.1997 / 09:44:40 / cg"
!
-initialize
- |holder|
-
- super initialize.
-
- userClass := UserClass.
- userSpecs := UserSpecs.
- userLabels := UserLabels.
-
- gallery := UIGalleryView new.
-
- gallery model:(ValueHolder new).
- gallery listHolder:(ValueHolder new).
- gallery minorKeysHolder:(ValueHolder new).
- gallery menuSelector:#raiseMenu.
-
- gallery clientSpecHolder:(holder := ValueHolder new).
- holder addDependent:self.
-
- majorSelection := 0.
-!
-
postOpenWith:aBuilder
self majorChannel value:1.
+ super postOpenWith:aBuilder.
! !
!UISelectionPanel methodsFor:'user defined'!