--- a/DoWhatIMeanSupport.st	Mon Dec 17 16:11:34 2018 +0100
+++ b/DoWhatIMeanSupport.st	Mon Dec 17 17:45:04 2018 +0100
@@ -173,7 +173,7 @@
                 "/ try to parse the selected text alone as expression
                 remember := false.    
                 tree := RBParser
-                    parseExpression:(source copyFrom:interval start to:(interval stop min:source size))
+                    parseExpression:(source copyFrom:(interval start max:1) to:((interval stop max:1) min:source size))
                     onError:
                         [:str :err ":nodesSoFar" |
                             "Transcript showCR:'Parse-Error: ',str."
@@ -201,6 +201,7 @@
     ^ node
 
     "Modified: / 06-07-2011 / 12:42:53 / cg"
+    "Modified: / 17-12-2018 / 17:32:30 / Claus Gittinger"
 !
 
 findNodeForInterval:interval in:source allowErrors:allowErrors