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.
*** empty log message ***
authorclaus
Fri, 17 Feb 1995 18:19:08 +0100
changeset 65 dd199ab603cf
parent 64 cea571d630e1
child 66 fe0c880f8ac0
*** empty log message ***
FBrowser.st file | annotate | diff | comparison | revisions
FileBrowser.st file | annotate | diff | comparison | revisions 
--- a/FBrowser.st	Fri Feb 17 14:25:23 1995 +0100
+++ b/FBrowser.st	Fri Feb 17 18:19:08 1995 +0100
@@ -28,7 +28,7 @@
 COPYRIGHT (c) 1991 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libtool/Attic/FBrowser.st,v 1.28 1995-02-17 13:24:58 claus Exp $
+$Header: /cvs/stx/stx/libtool/Attic/FBrowser.st,v 1.29 1995-02-17 17:19:08 claus Exp $
 '!
 
 !FileBrowser class methodsFor:'documentation'!
@@ -49,7 +49,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libtool/Attic/FBrowser.st,v 1.28 1995-02-17 13:24:58 claus Exp $
+$Header: /cvs/stx/stx/libtool/Attic/FBrowser.st,v 1.29 1995-02-17 17:19:08 claus Exp $
 "
 !
 
@@ -1088,9 +1088,9 @@
 		startNr := 1.
 		nLines := someText size.
 		[startNr <= nLines] whileTrue:[
-		    string := someText asStringFrom:startNr
-						 to:((startNr + 1000) min:nLines)
-				       compressTabs:compressTabs.
+		    string := someText asStringWithCRsFrom:startNr
+							to:((startNr + 1000) min:nLines)
+					      compressTabs:compressTabs.
 		    stream nextPutAll:string.
 		    startNr := startNr + 1000 + 1.
 		].
--- a/FileBrowser.st	Fri Feb 17 14:25:23 1995 +0100
+++ b/FileBrowser.st	Fri Feb 17 18:19:08 1995 +0100
@@ -28,7 +28,7 @@
 COPYRIGHT (c) 1991 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.28 1995-02-17 13:24:58 claus Exp $
+$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.29 1995-02-17 17:19:08 claus Exp $
 '!
 
 !FileBrowser class methodsFor:'documentation'!
@@ -49,7 +49,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.28 1995-02-17 13:24:58 claus Exp $
+$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.29 1995-02-17 17:19:08 claus Exp $
 "
 !
 
@@ -1088,9 +1088,9 @@
 		startNr := 1.
 		nLines := someText size.
 		[startNr <= nLines] whileTrue:[
-		    string := someText asStringFrom:startNr
-						 to:((startNr + 1000) min:nLines)
-				       compressTabs:compressTabs.
+		    string := someText asStringWithCRsFrom:startNr
+							to:((startNr + 1000) min:nLines)
+					      compressTabs:compressTabs.
 		    stream nextPutAll:string.
 		    startNr := startNr + 1000 + 1.
 		].
hg/stx-libtool