equal
deleted
inserted
replaced
5 classVariableNames:'' |
5 classVariableNames:'' |
6 poolDictionaries:'' |
6 poolDictionaries:'' |
7 category:'Interface-Internationalization' |
7 category:'Interface-Internationalization' |
8 ! |
8 ! |
9 |
9 |
|
10 !UserMessage class methodsFor:'documentation'! |
|
11 |
|
12 documentation |
|
13 " |
|
14 added for vw5i compatibility, which accesses messageCatalogs |
|
15 via: |
|
16 (#key << #catalogID >> 'defaultMessage') |
|
17 which creates an instance of UserMessage. |
|
18 |
|
19 Currently, this is a dummy operation in ST/X, however it is mapped onto |
|
20 the resource mechanism, if the given catalogID is the name of a class; |
|
21 i.e. |
|
22 (YesNoBox classResources string:'continue') |
|
23 can now also be written as: |
|
24 (#continue << #YesNoBox) |
|
25 " |
|
26 ! ! |
10 |
27 |
11 !UserMessage class methodsFor:'instance creation'! |
28 !UserMessage class methodsFor:'instance creation'! |
12 |
29 |
13 key:aKeySymbol catalogID:aCatalogSymbol |
30 key:aKeySymbol catalogID:aCatalogSymbol |
14 ^ self new key:aKeySymbol catalogID:aCatalogSymbol |
31 ^ self new key:aKeySymbol catalogID:aCatalogSymbol |
106 ! ! |
123 ! ! |
107 |
124 |
108 !UserMessage class methodsFor:'documentation'! |
125 !UserMessage class methodsFor:'documentation'! |
109 |
126 |
110 version |
127 version |
111 ^ '$Header: /cvs/stx/stx/libbasic/UserMessage.st,v 1.1 2001-09-07 15:58:03 cg Exp $' |
128 ^ '$Header: /cvs/stx/stx/libbasic/UserMessage.st,v 1.2 2001-09-07 18:45:25 cg Exp $' |
112 ! ! |
129 ! ! |