diff -r e4e6e12cbd1f -r 8cacd0f9ed92 PopUpList.st --- a/PopUpList.st Fri Jun 19 01:05:00 1998 +0200 +++ b/PopUpList.st Fri Jun 19 01:58:08 1998 +0200 @@ -859,9 +859,9 @@ listHolder notNil ifTrue:[ self list:listHolder value. - model notNil ifTrue:[ - self halt. - ] +"/ model notNil ifTrue:[ +"/ self halt. +"/ ] ] ifFalse:[ (listMsg notNil and:[model notNil]) ifTrue:[ (model respondsTo:listMsg) ifTrue:[ @@ -870,7 +870,7 @@ ]. ] - "Modified: / 18.6.1998 / 23:47:30 / cg" + "Modified: / 19.6.1998 / 01:54:17 / cg" ! getSelectionFromModel @@ -998,5 +998,5 @@ !PopUpList class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libwidg/PopUpList.st,v 1.56 1998-06-18 23:05:00 cg Exp $' + ^ '$Header: /cvs/stx/stx/libwidg/PopUpList.st,v 1.57 1998-06-18 23:58:08 cg Exp $' ! !