equal
deleted
inserted
replaced
4551 preferredFontEncoding := FontDescription preferredFontEncodingFor:fileEncoding. |
4551 preferredFontEncoding := FontDescription preferredFontEncodingFor:fileEncoding. |
4552 (CharacterEncoder isEncoding:preferredFontEncoding subSetOf:fontsEncoding) ifFalse:[ |
4552 (CharacterEncoder isEncoding:preferredFontEncoding subSetOf:fontsEncoding) ifFalse:[ |
4553 doNotShowFontDialog == true ifTrue:[ |
4553 doNotShowFontDialog == true ifTrue:[ |
4554 action := #show |
4554 action := #show |
4555 ] ifFalse:[ |
4555 ] ifFalse:[ |
4556 action := Dialog choose:(resources string:'''%1'' seems to require a %2 font (file encoding is %3).' |
4556 action := Dialog choose:(resources string:'''%1'' seems to require a %2 (or unicode) font (file encoding is %3).' |
4557 with:self fileName baseName |
4557 with:self fileName baseName |
4558 with:preferredFontEncoding allBold |
4558 with:preferredFontEncoding allBold |
4559 with:fileEncoding) |
4559 with:fileEncoding) |
4560 labels:(resources array:#('Cancel' 'Show' 'Don''t Ask Again' 'Change Font')) |
4560 labels:(resources array:#('Cancel' 'Show' 'Don''t Ask Again' 'Change Font')) |
4561 values:#(nil #show #showAlways #encoding) |
4561 values:#(nil #show #showAlways #encoding) |
4877 editView saveAction:[ self doSaveAs ]. |
4877 editView saveAction:[ self doSaveAs ]. |
4878 |
4878 |
4879 aWidget modifiedChannel:self viewModifiedChannel. |
4879 aWidget modifiedChannel:self viewModifiedChannel. |
4880 |
4880 |
4881 editView externalEncoding:self fileEncoding. |
4881 editView externalEncoding:self fileEncoding. |
4882 editView characterEncoding:'unicode'. |
4882 "/ editView characterEncoding:'unicode'. - thats the default anyway |
4883 ! |
4883 ! |
4884 |
4884 |
4885 postBuildWith:aBuilder |
4885 postBuildWith:aBuilder |
4886 |
4886 |
4887 super postBuildWith:aBuilder. |
4887 super postBuildWith:aBuilder. |
5437 ! ! |
5437 ! ! |
5438 |
5438 |
5439 !FileApplicationNoteBook class methodsFor:'documentation'! |
5439 !FileApplicationNoteBook class methodsFor:'documentation'! |
5440 |
5440 |
5441 version |
5441 version |
5442 ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.155 2004-02-25 20:19:47 cg Exp $' |
5442 ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.156 2004-02-28 12:58:25 cg Exp $' |
5443 ! ! |
5443 ! ! |