--- a/SourceCodeManagerUtilities.st Fri Apr 11 14:58:48 2003 +0200
+++ b/SourceCodeManagerUtilities.st Fri Apr 11 19:27:06 2003 +0200
@@ -769,8 +769,8 @@
classes do:[:aClass |
self activityNotification:(resources string:'checking in %1' with:aClass name).
"/ ca does not want boxes to pop up all over ...
- InformationSignal handle:[:ex |
- Transcript showCR:ex errorString
+ UserInformation handle:[:ex |
+ Transcript showCR:ex description
] do:[
AbortSignal handle:[:ex |
] do:[
@@ -864,8 +864,8 @@
].
methodSource := s contents.
- InformationSignal handle:[:ex |
- Transcript showCR:ex errorString
+ UserInformation handle:[:ex |
+ Transcript showCR:ex description
] do:[
(mgr
checkin:containerFileName
@@ -1040,7 +1040,7 @@
^ self
].
aStream class readErrorSignal handle:[:ex |
- self warn:('read error while reading extracted source\\' , ex errorString) withCRs.
+ self warn:('read error while reading extracted source\\' , ex description) withCRs.
aStream close.
^ self
] do:[
@@ -1337,7 +1337,7 @@
^ self
].
aStream class readErrorSignal handle:[:ex |
- self warn:('read error while reading extracted source\\' , ex errorString) withCRs.
+ self warn:('read error while reading extracted source\\' , ex description) withCRs.
aStream close.
^ self
] do:[
@@ -2098,5 +2098,5 @@
!SourceCodeManagerUtilities class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilities.st,v 1.88 2003-02-25 14:51:07 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilities.st,v 1.89 2003-04-11 17:27:06 stefan Exp $'
! !