514 s nextPutLine:'"/ Font settings:'. |
514 s nextPutLine:'"/ Font settings:'. |
515 s nextPutLine:'"/ (only restored, if image is restarted on the same display)'. |
515 s nextPutLine:'"/ (only restored, if image is restarted on the same display)'. |
516 s nextPutLine:'"/'. |
516 s nextPutLine:'"/'. |
517 s nextPutLine:'Display notNil ifTrue:['. |
517 s nextPutLine:'Display notNil ifTrue:['. |
518 s nextPutLine:' Display displayName = ' , (screen displayName storeString) , ' ifTrue:['. |
518 s nextPutLine:' Display displayName = ' , (screen displayName storeString) , ' ifTrue:['. |
519 s nextPutLine:' View defaultFont: ' , (View defaultFont storeString) , '.'. |
519 { |
520 s nextPutLine:' Label defaultFont: ' , (Label defaultFont storeString) , '.'. |
520 View . Label . CheckBox . CheckLabel . Button . Toggle . |
521 s nextPutLine:' Button defaultFont: ' , (Button defaultFont storeString) , '.'. |
521 SelectionInListView . MenuView . MenuPanel . NoteBookView . PullDownMenu . |
522 s nextPutLine:' Toggle defaultFont: ' , (Toggle defaultFont storeString) , '.'. |
522 TextView . EditTextView . CodeView |
523 s nextPutLine:' SelectionInListView defaultFont: ' , (SelectionInListView defaultFont storeString) , '.'. |
523 } do:[:cls | |
524 s nextPutLine:' MenuView defaultFont: ' , (MenuView defaultFont storeString) , '.'. |
524 s nextPutLine:' ',cls name,' defaultFont: ' , (cls defaultFont storeString) , '.'. |
525 s nextPutLine:' MenuPanel defaultFont: ' , (MenuPanel defaultFont storeString) , '.'. |
525 ]. |
526 s nextPutLine:' NoteBookView defaultFont: ' , (NoteBookView defaultFont storeString) , '.'. |
|
527 s nextPutLine:' PullDownMenu defaultFont: ' , (PullDownMenu defaultFont storeString) , '.'. |
|
528 s nextPutLine:' TextView defaultFont: ' , (TextView defaultFont storeString) , '.'. |
|
529 s nextPutLine:' EditTextView defaultFont: ' , (EditTextView defaultFont storeString) , '.'. |
|
530 s nextPutLine:' CodeView defaultFont: ' , (CodeView defaultFont storeString) , '.'. |
|
531 s nextPutLine:' ].'. |
526 s nextPutLine:' ].'. |
532 s nextPutLine:'].'. |
527 s nextPutLine:'].'. |
533 |
528 |
534 s cr. |
529 s cr. |
535 s nextPutLine:'"/'. |
530 s nextPutLine:'"/'. |
4510 ! ! |
4505 ! ! |
4511 |
4506 |
4512 !UserPreferences class methodsFor:'documentation'! |
4507 !UserPreferences class methodsFor:'documentation'! |
4513 |
4508 |
4514 version |
4509 version |
4515 ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.347 2013-09-04 17:30:17 cg Exp $' |
4510 ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.348 2013-09-04 22:03:11 cg Exp $' |
4516 ! |
4511 ! |
4517 |
4512 |
4518 version_CVS |
4513 version_CVS |
4519 ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.347 2013-09-04 17:30:17 cg Exp $' |
4514 ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.348 2013-09-04 22:03:11 cg Exp $' |
4520 ! |
4515 ! |
4521 |
4516 |
4522 version_SVN |
4517 version_SVN |
4523 ^ '$ Id: UserPreferences.st 10648 2011-06-23 15:55:10Z vranyj1 $' |
4518 ^ '$ Id: UserPreferences.st 10648 2011-06-23 15:55:10Z vranyj1 $' |
4524 ! ! |
4519 ! ! |