equal
deleted
inserted
replaced
515 |familyLabel faceLabel sizeLabel panel fontBrowserView v1 v2 v3 |
515 |familyLabel faceLabel sizeLabel panel fontBrowserView v1 v2 v3 |
516 mm fH eH l box1 box2 showFontNameLabel xftCheckBox| |
516 mm fH eH l box1 box2 showFontNameLabel xftCheckBox| |
517 |
517 |
518 super initialize. |
518 super initialize. |
519 |
519 |
520 showFontNameLabel := device platformName ~= #WIN32. |
520 showFontNameLabel := self graphicsDevice platformName ~= #WIN32. |
521 sizeUnit := #pt. |
521 sizeUnit := #pt. |
522 |
522 |
523 mm := ViewSpacing. |
523 mm := ViewSpacing. |
524 |
524 |
525 self addAbortAndOkButtons. |
525 self addAbortAndOkButtons. |
1282 ! ! |
1282 ! ! |
1283 |
1283 |
1284 !FontPanel class methodsFor:'documentation'! |
1284 !FontPanel class methodsFor:'documentation'! |
1285 |
1285 |
1286 version |
1286 version |
1287 ^ '$Header: /cvs/stx/stx/libwidg/FontPanel.st,v 1.120 2014-03-18 10:11:21 cg Exp $' |
1287 ^ '$Header: /cvs/stx/stx/libwidg/FontPanel.st,v 1.121 2014-03-19 10:04:00 stefan Exp $' |
1288 ! |
1288 ! |
1289 |
1289 |
1290 version_CVS |
1290 version_CVS |
1291 ^ '$Header: /cvs/stx/stx/libwidg/FontPanel.st,v 1.120 2014-03-18 10:11:21 cg Exp $' |
1291 ^ '$Header: /cvs/stx/stx/libwidg/FontPanel.st,v 1.121 2014-03-19 10:04:00 stefan Exp $' |
1292 ! ! |
1292 ! ! |
1293 |
1293 |