#REFACTORING by cg
authorClaus Gittinger <cg@exept.de>
Fri, 18 May 2018 04:28:00 +0200
changeset 6323 9d9d186b4bac
parent 6322 d6cd7f125437
child 6324 8e8b519078f0
#REFACTORING by cg class: Workspace changed: #browseIt
Workspace.st
--- a/Workspace.st	Wed May 16 09:01:02 2018 +0200
+++ b/Workspace.st	Fri May 18 04:28:00 2018 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -1729,7 +1727,7 @@
 
     "/ check for expr >> selector...
     "/ i.e. given a whoString
-    idx := codeToEvaluate indexOf:'»'.
+    idx := codeToEvaluate indexOf:'»'.
     idx ~~ 0 ifTrue:[
         possibleSelectorString := codeToEvaluate copyFrom:idx+1.
         codeToEvaluate := codeToEvaluate copyTo:idx-1.
@@ -1798,7 +1796,7 @@
     doItAction isNil ifTrue:[
         getClassToBrowseWithoutDoIt value
     ] ifFalse:[
-        (Parser parseErrorSignal , MessageNotUnderstood) 
+        (ParseError , MessageNotUnderstood) 
             handle:getClassToBrowseWithoutDoIt
             do:[
                 gotResult := false.