match without ignore
authorClaus Gittinger <cg@exept.de>
Fri, 13 Apr 2007 12:18:33 +0200
changeset 3478 13c5be5a11fe
parent 3477 c5b864b4affa
child 3479 5f9c6ff4fe6d
match without ignore
TextView.st
--- a/TextView.st	Wed Apr 11 12:50:03 2007 +0200
+++ b/TextView.st	Fri Apr 13 12:18:33 2007 +0200
@@ -2876,9 +2876,9 @@
         ifFound:foundBlock 
         ifNotFound:notFoundBlock
         onError:failBlock
-        ignoring:(parenthesisSpecification at:#ignore) "/ #( $' $" '$[' '$]' '${' '$)' )
-
-    "Modified: 18.5.1996 / 11:05:57 / cg"
+        ignoring:(parenthesisSpecification at:#ignore ifAbsent:#()) "/ #( $' $" '$[' '$]' '${' '$)' )
+
+    "Modified: / 12-04-2007 / 11:24:24 / cg"
 !
 
 searchForMatchingParenthesisFromLine:startLine col:startCol
@@ -2901,7 +2901,7 @@
         openingCharacters: (parenthesisSpecification at:#open)  "/ #( $( $[ ${ "$> $<") 
         closingCharacters: (parenthesisSpecification at:#close) "/ #( $) $] $} "$> $<")
         ignoredCharacters: ignoreSet
-        specialEOLComment: (parenthesisSpecification at:#eolComment) "/
+        specialEOLComment: (parenthesisSpecification at:#eolComment ifAbsent:#()) "/
 
 "/    |i direction lineString 
 "/     parChar charSet  closingChar 
@@ -3047,7 +3047,7 @@
 "/    ].
 "/    ^ notFoundBlock value
 
-    "Modified: 15.10.1996 / 12:22:30 / cg"
+    "Modified: / 12-04-2007 / 11:25:36 / cg"
 !
 
 searchForMatchingParenthesisFromLine:startLine col:startCol
@@ -3933,7 +3933,7 @@
 !TextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.277 2007-03-06 15:09:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.278 2007-04-13 10:18:33 cg Exp $'
 ! !
 
 TextView initialize!