GenericException.st
changeset 24384 592efc000e62
parent 24175 f8e000cf6617
child 24453 042e5f43fdc5
--- a/GenericException.st	Fri Jun 28 08:49:29 2019 +0200
+++ b/GenericException.st	Fri Jun 28 08:49:53 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1993 by Claus Gittinger
 	      All Rights Reserved
@@ -2061,16 +2063,17 @@
     "helper for all raiseRequest methods"
 
     self mayProceed ifFalse:[
-	StrictRaising ifTrue:[
-	    "/ proceeding from wrongProceedabilitySignal grants the raiseRequest
-	    WrongProceedabilityError raiseRequestWith:self creator.
-	] ifFalse:[
-	    self class name infoPrint.
-	    ' [warning]: raised with wrong proceedability' infoPrintCR.
-	]
+        StrictRaising ifTrue:[
+            "/ proceeding from wrongProceedabilitySignal grants the raiseRequest
+            WrongProceedabilityError raiseRequestWith:self creator.
+        ] ifFalse:[
+            self className infoPrint.
+            ' [warning]: raised with wrong proceedability' infoPrintCR.
+        ]
     ].
 
     "Created: / 10-08-2010 / 09:54:41 / cg"
+    "Modified: / 28-06-2019 / 08:44:21 / Claus Gittinger"
 !
 
 doCallAction