--- a/LSelBox.st Thu Jul 24 18:21:24 1997 +0200
+++ b/LSelBox.st Thu Jul 24 18:22:41 1997 +0200
@@ -17,7 +17,7 @@
category:'Views-DialogBoxes'
!
-!ListSelectionBox class methodsFor:'documentation'!
+!ListSelectionBox class methodsFor:'documentation'!
copyright
"
@@ -93,7 +93,7 @@
"
! !
-!ListSelectionBox class methodsFor:'instance creation'!
+!ListSelectionBox class methodsFor:'instance creation'!
title:titleString okText:okText abortText:abortText list:aList action:aBlock
"create and return a new listSelectionBox with list already defined"
@@ -105,7 +105,7 @@
^ newBox list:aList
! !
-!ListSelectionBox class methodsFor:'defaults'!
+!ListSelectionBox class methodsFor:'defaults'!
defaultExtent
"return the default extent of my instances.
@@ -252,15 +252,16 @@
"Modified: 31.5.1996 / 22:02:33 / cg"
!
-realize
- "redefined to update the list now.
+postRealize
+ "update the list now.
This was not done in #initialize to allow settings to be changed before,
in case list-updating is a slow operation - such as reading a directory"
+ super postRealize.
self updateList.
- super realize
"Modified: 12.5.1996 / 21:50:50 / cg"
+ "Created: 24.7.1997 / 18:22:19 / cg"
!
updateList
@@ -335,8 +336,8 @@
"Modified: 26.10.1995 / 17:20:06 / cg"
! !
-!ListSelectionBox class methodsFor:'documentation'!
+!ListSelectionBox class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/Attic/LSelBox.st,v 1.37 1996-10-14 15:33:36 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/Attic/LSelBox.st,v 1.38 1997-07-24 16:22:41 cg Exp $'
! !
--- a/ListSelectionBox.st Thu Jul 24 18:21:24 1997 +0200
+++ b/ListSelectionBox.st Thu Jul 24 18:22:41 1997 +0200
@@ -17,7 +17,7 @@
category:'Views-DialogBoxes'
!
-!ListSelectionBox class methodsFor:'documentation'!
+!ListSelectionBox class methodsFor:'documentation'!
copyright
"
@@ -93,7 +93,7 @@
"
! !
-!ListSelectionBox class methodsFor:'instance creation'!
+!ListSelectionBox class methodsFor:'instance creation'!
title:titleString okText:okText abortText:abortText list:aList action:aBlock
"create and return a new listSelectionBox with list already defined"
@@ -105,7 +105,7 @@
^ newBox list:aList
! !
-!ListSelectionBox class methodsFor:'defaults'!
+!ListSelectionBox class methodsFor:'defaults'!
defaultExtent
"return the default extent of my instances.
@@ -252,15 +252,16 @@
"Modified: 31.5.1996 / 22:02:33 / cg"
!
-realize
- "redefined to update the list now.
+postRealize
+ "update the list now.
This was not done in #initialize to allow settings to be changed before,
in case list-updating is a slow operation - such as reading a directory"
+ super postRealize.
self updateList.
- super realize
"Modified: 12.5.1996 / 21:50:50 / cg"
+ "Created: 24.7.1997 / 18:22:19 / cg"
!
updateList
@@ -335,8 +336,8 @@
"Modified: 26.10.1995 / 17:20:06 / cg"
! !
-!ListSelectionBox class methodsFor:'documentation'!
+!ListSelectionBox class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/ListSelectionBox.st,v 1.37 1996-10-14 15:33:36 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/ListSelectionBox.st,v 1.38 1997-07-24 16:22:41 cg Exp $'
! !