ChangesBrowser.st
branchjv
changeset 18532 cccb41254edf
parent 17216 47ff06181c21
child 19605 623b8047f9ad
--- a/ChangesBrowser.st	Thu Oct 11 14:14:49 2018 +0200
+++ b/ChangesBrowser.st	Wed Nov 14 11:58:00 2018 +0100
@@ -3605,7 +3605,7 @@
     "/ does not care for VW qualified names
     "/ ^ Parser parseExpression:text inNameSpace:nameSpace.
 
-(text includesString:'§') ifTrue:[self halt].
+(text includesString:'§') ifTrue:[self halt].
 
     "/ new:
     parser := Parser for:(ReadStream on:text).
@@ -6581,7 +6581,7 @@
     "
     clsName := nil.
 
-(chunkText includesString:'§') ifTrue:[self halt].
+(chunkText includesString:'§') ifTrue:[self halt].
 
     p := browser parseExpression:chunkText inNameSpace:(self nameSpaceForApply).
     (p notNil and:[p ~~ #Error and:[p isMessage]]) ifTrue:[