equal
deleted
inserted
replaced
3 "{ NameSpace: Cairo }" |
3 "{ NameSpace: Cairo }" |
4 |
4 |
5 SharedPool subclass:#FontSlant |
5 SharedPool subclass:#FontSlant |
6 instanceVariableNames:'' |
6 instanceVariableNames:'' |
7 classVariableNames:'CAIRO_FONT_SLANT_NORMAL CAIRO_FONT_SLANT_ITALIC |
7 classVariableNames:'CAIRO_FONT_SLANT_NORMAL CAIRO_FONT_SLANT_ITALIC |
8 CAIRO_FONT_SLANT_OBLIQUE' |
8 CAIRO_FONT_SLANT_OBLIQUE SymbolicFontSlantToCairoFontSlantMap' |
9 poolDictionaries:'' |
9 poolDictionaries:'' |
10 category:'Cairo-Constants' |
10 category:'Cairo-Constants' |
11 ! |
11 ! |
12 |
12 |
13 !FontSlant class methodsFor:'initialization'! |
13 !FontSlant class methodsFor:'initialization'! |
15 initialize |
15 initialize |
16 |
16 |
17 CAIRO_FONT_SLANT_NORMAL := 0. |
17 CAIRO_FONT_SLANT_NORMAL := 0. |
18 CAIRO_FONT_SLANT_ITALIC := 1. |
18 CAIRO_FONT_SLANT_ITALIC := 1. |
19 CAIRO_FONT_SLANT_OBLIQUE := 2. |
19 CAIRO_FONT_SLANT_OBLIQUE := 2. |
|
20 |
|
21 SymbolicFontSlantToCairoFontSlantMap := Dictionary new. |
|
22 SymbolicFontSlantToCairoFontSlantMap at: 'roman' put: CAIRO_FONT_SLANT_NORMAL. |
|
23 SymbolicFontSlantToCairoFontSlantMap at: 'normal' put: CAIRO_FONT_SLANT_NORMAL. |
|
24 SymbolicFontSlantToCairoFontSlantMap at: 'italic' put: CAIRO_FONT_SLANT_ITALIC. |
|
25 SymbolicFontSlantToCairoFontSlantMap at: 'obligue' put: CAIRO_FONT_SLANT_OBLIQUE. |
|
26 |
|
27 "Modified: / 09-01-2015 / 15:12:05 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
20 ! ! |
28 ! ! |
21 |
29 |
22 !FontSlant class methodsFor:'constants'! |
30 !FontSlant class methodsFor:'constants'! |
23 |
31 |
24 CAIRO_FONT_SLANT_ITALIC |
32 CAIRO_FONT_SLANT_ITALIC |