Writing rich text in a text pane to disk (for later filein)
Bert Freudenberg
bert at isg.cs.uni-magdeburg.de
Thu Jul 24 22:19:11 UTC 2003
Am Donnerstag, 24.07.03 um 23:31 Uhr schrieb Ned Konz:
> 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.
Ugh. That looks suspiciously familiar. Didn't my message a few days ago
make it?
I think it did: http://groups.yahoo.com/group/squeak/message/66293
-- Bert
More information about the Squeak-dev
mailing list
|