--- a/SourceCodeManagerUtilities.st	Fri Feb 15 09:43:55 2019 +0100
+++ b/SourceCodeManagerUtilities.st	Fri Feb 15 10:11:44 2019 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 2000 eXept Software AG
               All Rights Reserved
@@ -1167,12 +1169,9 @@
         ] ifFalse:[
             msg := 'The ProblemChecker found %1 errors/inconsistencies.\\Browse them for detail or repair?'
         ].
-        answer := Dialog confirmWithCancel:(msg bindWith:numProblems 
-                                                with:problems first label) withCRs.
-        answer isNil ifTrue:[
-            "/ cancel
-            AbortOperationRequest raiseRequest
-        ].
+        answer := Dialog confirmWithRaiseAbortOnCancel:
+                                (msg bindWith:numProblems 
+                                     with:problems first label) withCRs.
         answer == true ifTrue:[
             dialog := Tools::ProjectCheckerBrowser new.
             dialog
@@ -1186,6 +1185,8 @@
             ].
         ].
     ].
+
+    "Modified: / 15-02-2019 / 09:27:46 / Claus Gittinger"
 !
 
 versionString:a isLessThan:b