Writing rich text in a text pane to disk (for later filein)
Ned Konz
ned at bike-nomad.com
Thu Jul 24 21:31:24 UTC 2003
On Thursday 24 July 2003 01:58 pm, David N Smith wrote:
> I'm looking for bugs; please try this and see if you find any. I've
> only run it under Windows XP Pro using 3.4, 3.5, and 3.6.
Not a bug, but a suggestion:
Instead of this:
fs nextPutAll: 'StringHolder new contents: (Text string: ';
nextPutAll: self string printString;
cr; nextPutAll: 'runs: ';
nextPutAll: self runs storeString;
cr; nextPutAll: ');
openLabel:';
nextPutAll: aTitleString printString;
close.
You could just do this:
fs nextPutAll: 'StringHolder new contents: ';
store: self;
nextPutAll: '; openLabel:';
print: aTitleString;
close.
--
Ned Konz
http://bike-nomad.com
GPG key ID: BEEA7EFE
More information about the Squeak-dev
mailing list
|