DoWhatIMeanSupport.st
changeset 4334 80c903b3a23b
parent 4329 2150d2f0b794
child 4339 6abf010fa92f
--- a/DoWhatIMeanSupport.st	Fri Aug 23 12:06:21 2013 +0200
+++ b/DoWhatIMeanSupport.st	Fri Aug 23 14:59:06 2013 +0200
@@ -1157,9 +1157,9 @@
 "/        node := self findNodeForInterval:interval in:source allowErrors:true.
 "/    ].
     node isNil ifTrue:[
-        Transcript showCR:'No parseNode found'.
+        Transcript showCR:'No parseNode found (syntax error before?)'.
         self breakPoint:#cg.
-        self information:'No parseNode found'.
+        self information:'No parseNode found (syntax error before?)'.
         ^ self.
     ].
 
@@ -2100,9 +2100,9 @@
 "/        node := self findNodeForInterval:interval in:source allowErrors:true.
 "/    ].
     node isNil ifTrue:[
-        Transcript showCR:'No parseNode found'.
+        Transcript showCR:'No parseNode found (syntax error before?)'.
         self breakPoint:#cg.
-        self information:'No parseNode found'.
+        self information:'No parseNode found (syntax error before?)'.
         ^ self.
     ].
 
@@ -3568,10 +3568,10 @@
 !DoWhatIMeanSupport class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/DoWhatIMeanSupport.st,v 1.118 2013-08-22 08:43:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/DoWhatIMeanSupport.st,v 1.119 2013-08-23 12:59:06 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/DoWhatIMeanSupport.st,v 1.118 2013-08-22 08:43:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/DoWhatIMeanSupport.st,v 1.119 2013-08-23 12:59:06 cg Exp $'
 ! !