equal
deleted
inserted
replaced
1024 sizeUnit:sizeUnit |
1024 sizeUnit:sizeUnit |
1025 encoding:encoding. |
1025 encoding:encoding. |
1026 |
1026 |
1027 newFont flags:flags. |
1027 newFont flags:flags. |
1028 |
1028 |
1029 ^ newFont onDevice:self graphicsDevice. |
1029 "SR: |
|
1030 old code is commented below, |
|
1031 someone has forgotten to set the incoming argument device, |
|
1032 why using the device from the old font??? is this a mistake??? |
|
1033 at least the naming of this method wants a new font on given device...." |
|
1034 ^ newFont onDevice:aDevice. |
|
1035 "/ ^ newFont onDevice:self graphicsDevice. |
1030 |
1036 |
1031 "Created: 28.3.1997 / 16:09:30 / cg" |
1037 "Created: 28.3.1997 / 16:09:30 / cg" |
1032 ! |
1038 ! |
1033 |
1039 |
1034 size:anotherSize |
1040 size:anotherSize |
1474 ! ! |
1480 ! ! |
1475 |
1481 |
1476 !FontDescription class methodsFor:'documentation'! |
1482 !FontDescription class methodsFor:'documentation'! |
1477 |
1483 |
1478 version |
1484 version |
1479 ^ '$Header: /cvs/stx/stx/libview/FontDescription.st,v 1.73 2009-11-10 16:34:54 stefan Exp $' |
1485 ^ '$Header: /cvs/stx/stx/libview/FontDescription.st,v 1.74 2009-11-26 13:39:03 sr Exp $' |
1480 ! |
1486 ! |
1481 |
1487 |
1482 version_CVS |
1488 version_CVS |
1483 ^ '$Header: /cvs/stx/stx/libview/FontDescription.st,v 1.73 2009-11-10 16:34:54 stefan Exp $' |
1489 ^ '$Header: /cvs/stx/stx/libview/FontDescription.st,v 1.74 2009-11-26 13:39:03 sr Exp $' |
1484 ! ! |
1490 ! ! |
1485 |
1491 |
1486 FontDescription initialize! |
1492 FontDescription initialize! |