#REFACTORING by stefan
authorStefan Vogel <sv@exept.de>
Fri, 17 Feb 2017 11:01:53 +0100
changeset 21482 4a261f7b1174
parent 21481 0a3191652c3d
child 21483 582158f616ff
#REFACTORING by stefan class: Behavior changed: #readFrom:onError:
Behavior.st
--- a/Behavior.st	Fri Feb 17 11:01:08 2017 +0100
+++ b/Behavior.st	Fri Feb 17 11:01:53 2017 +0100
@@ -1449,6 +1449,7 @@
 ! !
 
 
+
 !Behavior methodsFor:'RefactoringBrowser'!
 
 realClass
@@ -3034,7 +3035,7 @@
         newObject := self evaluatorClass evaluateFrom:aStream ifFail:exceptionBlock.
         ((newObject class == self) or:[newObject isKindOf:self])
             ifTrue:[newObject]
-            ifFalse:[^ exceptionBlock value].
+            ifFalse:[exceptionBlock value].
     ] on:Error do:exceptionBlock.
 
     "
@@ -3057,6 +3058,8 @@
      Object readFrom:'illegal' onError:['bla']
      String readFrom:'illegal' onError:'bla'
     "
+
+    "Modified: / 16-02-2017 / 21:26:38 / stefan"
 !
 
 readFromString:aString