Mercurial Mercurial > hg > stx-libtool / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
allow return in start-col
authorpenk
Tue, 10 Dec 2002 15:37:55 +0100
changeset 4361 f103a1a7ec7f
parent 4360 959719f86629
child 4362 02b41d834ad8
allow return in start-col
NewSystemBrowser.st file | annotate | diff | comparison | revisions
Tools__NewSystemBrowser.st file | annotate | diff | comparison | revisions 
--- a/NewSystemBrowser.st	Tue Dec 10 12:03:59 2002 +0100
+++ b/NewSystemBrowser.st	Tue Dec 10 15:37:55 2002 +0100
@@ -33523,9 +33523,9 @@
         lineString := eachLine string.
         (lineString withoutLeadingSeparators startsWith:'^') ifTrue:[
             col := lineString indexOf:$^.
-            col <= 4 ifTrue:[
-                ^ (lineNr -> 'bad indentation').
-            ].
+"/            col <= 4 ifTrue:[
+"/                ^ (lineNr -> 'bad indentation').
+"/            ].
             (col-1) \\ 4 ~~ 0 ifTrue:[
                 ^ (lineNr -> 'bad indentation').
             ].
@@ -54500,7 +54500,7 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Attic/NewSystemBrowser.st,v 1.499 2002-12-06 10:50:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Attic/NewSystemBrowser.st,v 1.500 2002-12-10 14:37:55 penk Exp $'
 ! !
 
 NewSystemBrowser initialize!
--- a/Tools__NewSystemBrowser.st	Tue Dec 10 12:03:59 2002 +0100
+++ b/Tools__NewSystemBrowser.st	Tue Dec 10 15:37:55 2002 +0100
@@ -33523,9 +33523,9 @@
         lineString := eachLine string.
         (lineString withoutLeadingSeparators startsWith:'^') ifTrue:[
             col := lineString indexOf:$^.
-            col <= 4 ifTrue:[
-                ^ (lineNr -> 'bad indentation').
-            ].
+"/            col <= 4 ifTrue:[
+"/                ^ (lineNr -> 'bad indentation').
+"/            ].
             (col-1) \\ 4 ~~ 0 ifTrue:[
                 ^ (lineNr -> 'bad indentation').
             ].
@@ -54500,7 +54500,7 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.499 2002-12-06 10:50:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.500 2002-12-10 14:37:55 penk Exp $'
 ! !
 
 NewSystemBrowser initialize!
hg/stx-libtool