Mercurial Mercurial > hg > stx-libbasic / 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.
asText eliminated
authorclaus
Sat, 11 Feb 1995 17:42:09 +0100
changeset 247 9e3057039d60
parent 246 f13be3ba45a0
child 248 601b44c71329
asText eliminated
CharArray.st file | annotate | diff | comparison | revisions
CharacterArray.st file | annotate | diff | comparison | revisions
Class.st file | annotate | diff | comparison | revisions 
--- a/CharArray.st	Sat Feb 11 15:10:11 1995 +0100
+++ b/CharArray.st	Sat Feb 11 17:42:09 1995 +0100
@@ -21,7 +21,7 @@
 COPYRIGHT (c) 1994 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libbasic/Attic/CharArray.st,v 1.12 1995-02-11 14:08:11 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Attic/CharArray.st,v 1.13 1995-02-11 16:41:53 claus Exp $
 '!
 
 !AbstractString class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libbasic/Attic/CharArray.st,v 1.12 1995-02-11 14:08:11 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Attic/CharArray.st,v 1.13 1995-02-11 16:41:53 claus Exp $
 "
 !
 
@@ -177,7 +177,7 @@
 asStringCollection
     "return a collection of lines from myself."
 
-    ^ Text from:self
+    ^ StringCollection from:self
 !
 
 asNumber
--- a/CharacterArray.st	Sat Feb 11 15:10:11 1995 +0100
+++ b/CharacterArray.st	Sat Feb 11 17:42:09 1995 +0100
@@ -21,7 +21,7 @@
 COPYRIGHT (c) 1994 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.12 1995-02-11 14:08:11 claus Exp $
+$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.13 1995-02-11 16:41:53 claus Exp $
 '!
 
 !AbstractString class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.12 1995-02-11 14:08:11 claus Exp $
+$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.13 1995-02-11 16:41:53 claus Exp $
 "
 !
 
@@ -177,7 +177,7 @@
 asStringCollection
     "return a collection of lines from myself."
 
-    ^ Text from:self
+    ^ StringCollection from:self
 !
 
 asNumber
--- a/Class.st	Sat Feb 11 15:10:11 1995 +0100
+++ b/Class.st	Sat Feb 11 17:42:09 1995 +0100
@@ -21,7 +21,7 @@
 COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libbasic/Class.st,v 1.27 1995-02-06 02:27:23 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Class.st,v 1.28 1995-02-11 16:42:09 claus Exp $
 '!
 
 !Class class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libbasic/Class.st,v 1.27 1995-02-06 02:27:23 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Class.st,v 1.28 1995-02-11 16:42:09 claus Exp $
 "
 !
 
@@ -2159,7 +2159,7 @@
 
     |text|
 
-    text := aMethod source asText.
+    text := aMethod source asStringCollection.
     (text size < 1) ifTrue:[^self].
     aPrintStream bold.
     aPrintStream nextPutAll:(text at:1).
@@ -2182,7 +2182,7 @@
      comments are printed italic"
 
     |text textIndex textSize line lineIndex lineSize inComment aCharacter|
-    text := aString asText.
+    text := aString asStringCollection.
     aPrintStream bold.
     aPrintStream nextPutAll:(text at:1).
     aPrintStream normal.
hg/stx-libbasic