--- a/SourceCodeManagerUtilities.st Sat Nov 25 00:42:30 2000 +0100
+++ b/SourceCodeManagerUtilities.st Sun Nov 26 14:34:30 2000 +0100
@@ -480,7 +480,9 @@
].
aborted ifTrue:[
Transcript showCR:'checkin of ''' , aClass name , ''' aborted'.
- (Dialog confirm:('checkin of ''' , aClass name , ''' aborted.\\Cancel all ?')withCRs)
+ (Dialog
+ confirm:('checkin of ''' , aClass name , ''' aborted.\\Cancel all ?')withCRs
+ default:false)
ifTrue:[
AbortAllSignal raise.
^ false
@@ -1648,5 +1650,5 @@
!SourceCodeManagerUtilities class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilities.st,v 1.43 2000-11-24 23:42:30 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilities.st,v 1.44 2000-11-26 13:34:21 cg Exp $'
! !