bug in long line handling fixed
authorClaus Gittinger <cg@exept.de>
Tue, 20 Jun 2006 15:20:22 +0200
changeset 6795 2ee1448e902a
parent 6794 c55a036a249e
child 6796 23a7b7f0bd39
bug in long line handling fixed
FileBrowser.st
--- a/FileBrowser.st	Wed Jun 14 20:07:55 2006 +0200
+++ b/FileBrowser.st	Tue Jun 20 15:20:22 2006 +0200
@@ -6092,7 +6092,7 @@
 
             s := ex parameter at:1.
             partialLine := ex parameter at:2.
-            ex proceedWith:(partialLine , s upTo:aCharacter)
+            ex proceedWith:(partialLine , (s upTo:aCharacter))
         ] do:[
             [aStream atEnd] whileFalse:[
                 line := aStream nextLine withTabsExpanded.
@@ -7520,5 +7520,5 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.611 2006-03-20 08:53:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.612 2006-06-20 13:20:22 cg Exp $'
 ! !