--- a/PopUpList.st	Fri Sep 15 18:41:03 2000 +0200
+++ b/PopUpList.st	Fri Sep 15 18:41:38 2000 +0200
@@ -567,7 +567,7 @@
     ].
 
     "kludge: dont want label to resize ..."
-self halt.
+
     self label:newLabel suppressResize:true.
 
     "
@@ -1123,5 +1123,5 @@
 !PopUpList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/PopUpList.st,v 1.67 2000-09-15 16:41:03 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/PopUpList.st,v 1.68 2000-09-15 16:41:38 cg Exp $'
 ! !