Scanner.st
changeset 2455 acdcc9b42d41
parent 2452 68a907bd9bd1
child 2478 21ef13183fb5
--- a/Scanner.st	Wed Nov 03 12:31:30 2010 +0100
+++ b/Scanner.st	Fri Nov 05 11:43:09 2010 +0100
@@ -1351,7 +1351,7 @@
 !
 
 notifyWarning:aMessage doNotShowAgainAction:doNotShowAgainAction position:position to:endPos
-    "notify requestor of an warning - if there is no requestor, just ignore it.
+    "notify requestor of a warning - if there is no requestor, just ignore it.
      Return the result passed back from the requestor (or false, if there is none)."
 
     |answer|
@@ -1372,6 +1372,8 @@
         answer := requestor warning:aMessage position:position to:endPos from:self
     ].
     ^ answer
+
+    "Modified: / 05-11-2010 / 10:52:22 / cg"
 !
 
 notifyWarning:aMessage position:position to:endPos
@@ -3283,11 +3285,11 @@
 !Scanner class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Scanner.st,v 1.256 2010-11-02 12:43:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Scanner.st,v 1.257 2010-11-05 10:43:09 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/Scanner.st,v 1.256 2010-11-02 12:43:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Scanner.st,v 1.257 2010-11-05 10:43:09 cg Exp $'
 ! !
 
 Scanner initialize!