--- a/SourceCodeManagerUtilities.st	Fri Mar 03 11:42:36 2006 +0100
+++ b/SourceCodeManagerUtilities.st	Mon Mar 06 09:55:07 2006 +0100
@@ -457,8 +457,7 @@
                         Transcript showCR:ex description.
                         ex proceed.
                     ] do:[
-                        AbortOperationRequest handle:[:ex |
-                        ] do:[
+                        AbortOperationRequest catch:[
                             self checkinClass:aClass withLog:checkinInfo withCheck:doCheckClasses
                         ]
                     ].
@@ -1009,7 +1008,7 @@
     "/
     newestRev := mgr newestRevisionOf:classToCompare.
     askForRevision ifTrue:[
-        msg := resources string:'compare to revision: (empty for newest)'.
+        msg := resources string:'Compare to revision: (empty for newest)'.
         rev notNil ifTrue:[
             msg := msg , '\\' , (resources string:'Current %1 is based upon rev %2.'
                                            with:nm allBold with:rev).
@@ -2424,5 +2423,5 @@
 !SourceCodeManagerUtilities class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilities.st,v 1.117 2006-02-23 15:47:40 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilities.st,v 1.118 2006-03-06 08:55:07 cg Exp $'
 ! !