diff -r 44300555526c -r 27a5e7ece5df HierarchicalList.st --- a/HierarchicalList.st Sun Mar 02 21:38:41 2003 +0100 +++ b/HierarchicalList.st Sun Mar 02 21:39:42 2003 +0100 @@ -327,7 +327,7 @@ (task := monitoringTask) notNil ifTrue:[ monitoringTask := nil. - Object errorSignal handle:[:ex|]do:[ + Error handle:[:ex|]do:[ task terminateWithAllSubprocessesInGroup. task waitUntilTerminated. ] @@ -384,5 +384,5 @@ !HierarchicalList class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalList.st,v 1.17 2003-01-20 12:02:46 ca Exp $' + ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalList.st,v 1.18 2003-03-02 20:39:42 stefan Exp $' ! !