--- a/smalltalk.rc Thu Sep 24 13:10:12 1998 +0200 +++ b/smalltalk.rc Fri Sep 25 16:06:36 1998 +0200 @@ -273,7 +273,7 @@ LicenceBox licenceRejectSignal handle:[:ex| Smalltalk exit ] do:[ - LicenceBox open. + (LicenceBox open) ifFalse:[Smalltalk exit]. Smalltalk at:#LicenceBox put:nil. ]. ].