author | matilk |
Tue, 05 Apr 2016 17:07:41 +0200 | |
changeset 3264 | 93f5deb3f9b6 |
parent 3248 | e92c9691ef33 |
child 3282 | 4e75a66b42af |
permissions | -rw-r--r-- |
2015 | 1 |
"{ Package: 'stx:libtool2' }" |
2 |
||
3 |
"{ NameSpace: Tools }" |
|
4 |
||
5 |
ApplicationModel subclass:#InternationalLanguageTranslationEditor |
|
6 |
instanceVariableNames:'languagesList keyStringsToLanguageMappings languageTextHolder |
|
7 |
originalTextHolder modified shownLanguages selectedKeyRow |
|
8 |
showMissingTranslationsOnly |
|
9 |
keyStringAndLanguageSelectionTableColumnDescriptionHolder |
|
10 |
languageShownHolders dataSetView lastExtractedClass |
|
11 |
lastExtractedApplicationClass stopApplicationIconVisibleHolder |
|
12 |
monitoredApplication originalTextModifiedHolder |
|
2048 | 13 |
languageTextModifiedHolder languageTextAcceptHolder |
14 |
inSingleFileMode lastExtractedProject lastLanguage |
|
2050 | 15 |
lastSelectedKey autoAcceptHolder languageEditor |
16 |
selectedColIndexHolder exampleLanguageSelectionHolder |
|
2051 | 17 |
exampleLanguageTextHolder pastePreviousTranslationEnableHolder |
2163 | 18 |
searchForSimilarTranslationEnableHolder alwaysWriteUTF8Holder |
2327 | 19 |
lastNameSpace pasteOriginalEnableHolder ignoreCaseHolder |
20 |
closeSearchBar searchTextModifiedHolder searchNextText |
|
21 |
searchBarImageInfoLabelHolder searchPreviousText searchBoxVisible |
|
22 |
searchBarInfoLabelHolder searchTextHolder searchTextView |
|
23 |
searchBoxView translationsPanel lastPackage' |
|
2032 | 24 |
classVariableNames:'LastExtractedClass LastExtractedApplicationClass |
2410 | 25 |
LastExtractedProject LastProject' |
2015 | 26 |
poolDictionaries:'' |
27 |
category:'Interface-UIPainter' |
|
28 |
! |
|
29 |
||
30 |
Object subclass:#AccessCollectingPseudoResourcePack |
|
31 |
instanceVariableNames:'collectedKeys realResourcePack' |
|
32 |
classVariableNames:'' |
|
33 |
poolDictionaries:'' |
|
34 |
privateIn:InternationalLanguageTranslationEditor |
|
35 |
! |
|
36 |
||
37 |
Collection subclass:#KeyStringsToLanguageMappings |
|
2032 | 38 |
instanceVariableNames:'keys keyInfo perLanguageInfo perLanguageMappings languageMappings |
2049 | 39 |
languages rowPerKey' |
2015 | 40 |
classVariableNames:'' |
41 |
poolDictionaries:'' |
|
42 |
privateIn:InternationalLanguageTranslationEditor |
|
43 |
! |
|
44 |
||
45 |
Object subclass:#LanguageMappingRow |
|
46 |
instanceVariableNames:'key mappings' |
|
47 |
classVariableNames:'' |
|
48 |
poolDictionaries:'' |
|
49 |
privateIn:InternationalLanguageTranslationEditor |
|
50 |
! |
|
51 |
||
52 |
Visitor subclass:#UISpecVisitor |
|
53 |
instanceVariableNames:'translatedLabels' |
|
54 |
classVariableNames:'' |
|
55 |
poolDictionaries:'' |
|
56 |
privateIn:InternationalLanguageTranslationEditor |
|
57 |
! |
|
58 |
||
59 |
!InternationalLanguageTranslationEditor class methodsFor:'documentation'! |
|
60 |
||
61 |
documentation |
|
62 |
" |
|
63 |
documentation to be added. |
|
64 |
||
65 |
[author:] |
|
2434 | 66 |
cg (cg@FUSI) |
2015 | 67 |
|
68 |
[instance variables:] |
|
69 |
||
70 |
[class variables:] |
|
71 |
||
72 |
[see also:] |
|
73 |
||
74 |
" |
|
75 |
! |
|
76 |
||
77 |
examples |
|
78 |
" |
|
79 |
Starting the application: |
|
2434 | 80 |
[exBegin] |
2015 | 81 |
InternationalLanguageTranslationEditor open |
82 |
||
2434 | 83 |
[exEnd] |
2015 | 84 |
|
85 |
more examples to be added: |
|
2434 | 86 |
[exBegin] |
87 |
... add code fragment for |
|
2015 | 88 |
... executable example here ... |
2434 | 89 |
[exEnd] |
2015 | 90 |
" |
91 |
! |
|
92 |
||
93 |
history |
|
94 |
"Created: / 04-03-2006 / 09:07:19 / cg" |
|
95 |
! ! |
|
96 |
||
2327 | 97 |
!InternationalLanguageTranslationEditor class methodsFor:'image specs'! |
98 |
||
99 |
closeSearchBarIcon |
|
100 |
"This resource specification was automatically generated |
|
101 |
by the ImageEditor of ST/X." |
|
102 |
||
103 |
"Do not manually edit this!! If it is corrupted, |
|
104 |
the ImageEditor may not be able to read the specification." |
|
105 |
||
106 |
" |
|
107 |
self closeSearchBar inspect |
|
108 |
ImageEditor openOnClass:self andSelector:#closeSearchBar |
|
109 |
Icon flushCachedIcons |
|
110 |
" |
|
111 |
||
112 |
<resource: #image> |
|
113 |
||
114 |
^Icon |
|
2434 | 115 |
constantNamed:#'Psiware::SystemManagement class closeSearchBar' |
116 |
ifAbsentPut:[(Depth8Image new) width: 22; height: 22; photometric:(#palette); bitsPerSample:(#[8]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:' |
|
2327 | 117 |
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@GQ\SD1LSD1LSD1LSD1LWGP@@@@@@ |
118 |
@ATGA@HA@PDA@PDA@PHDA1T@@@@@@@@TAENG!!(VB XA?_''57QPPT@@@@@@@@E NJ^V)&X%)UTT5IV7 KE @@@@@@@A A"7Q,#&9VS%^MQ$E<DQ @@@@@@@@Z |
|
119 |
@X%-#9NRX52R$80:^1@Z@@@@@@@@F0FHY6>R$9JR$9ION''(PF0@@@@@@@A<A 5ABT)FS$9D=KR13C1<@@@@@@@@)@WUCND*Q$9NQM"T!!XP8)@@@@@@@@K E2 |
|
120 |
O4RQ$9FQ$9@2G%8JK @@@@@@@CLA\S2D$9D9M)BS]!!1]BSL@@@@@@@@7@W@5LXP6J2\2]"P"VP 7@@@@@@@@O U+R3@*I2T#HA0&N5 RO @@@@@@@D LPF%( |
|
121 |
YVQ W59]VU 4CD @@@@@@@AGFP4F@PDA@PDA@PDFCQ%G@@@@@@@@K41TUEQTUEQTUEQTUEQLK0@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ |
|
122 |
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@a') ; colorMapFromArray:#[0 0 0 167 25 15 170 49 40 171 50 39 174 68 60 176 56 48 176 58 49 183 118 110 184 45 32 184 46 32 184 47 34 184 71 58 184 85 78 184 86 79 185 53 39 186 57 42 186 59 43 186 60 45 186 68 58 190 187 180 192 188 181 193 189 182 194 190 183 195 192 184 197 194 186 202 148 142 202 199 191 205 202 195 207 64 48 207 203 195 208 65 49 208 205 198 209 65 49 209 66 49 209 69 52 210 66 49 210 78 64 211 67 51 211 71 54 212 69 51 212 208 200 212 208 202 213 69 52 213 70 52 213 79 57 215 80 59 215 212 206 217 214 207 218 79 62 218 84 67 219 107 95 219 216 210 221 84 63 221 84 67 221 109 96 221 218 213 222 76 56 222 110 96 222 113 79 223 87 67 223 87 70 223 115 99 224 221 216 225 89 72 225 105 91 225 117 84 227 89 64 227 91 73 227 112 98 227 115 95 227 122 92 227 224 219 227 225 219 228 113 83 228 113 99 229 102 87 229 226 221 230 115 84 230 117 81 230 142 117 231 102 80 231 116 86 231 120 103 231 131 119 231 228 224 232 118 88 232 119 82 233 143 117 234 99 76 234 102 79 234 119 89 234 127 100 234 145 119 235 104 82 235 106 86 236 108 89 236 110 92 236 113 92 236 121 91 236 146 119 237 113 95 237 115 98 237 122 92 237 132 100 238 117 101 238 119 104 238 123 93 238 123 109 238 131 98 238 133 102 238 146 120 238 148 121 239 125 112 239 127 115 239 129 118 239 131 105 239 134 102 240 135 122 240 200 196 242 135 113 242 141 116 242 141 119 242 145 116 242 147 118 242 148 120 243 137 115 243 138 118 243 141 121 243 142 123 243 144 126 243 145 129 243 151 134 243 202 197 244 147 132 244 149 135 244 152 137 244 163 142 244 164 145 245 160 143 245 164 146 245 213 204 246 213 203 248 215 205 249 215 206 252 244 243 253 244 243 253 247 245 255 255 255]; mask:((Depth1Image new) width: 22; height: 22; photometric:(#blackIs0); bitsPerSample:(#[1]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@@@@@@@@@@G?? G?? G?? G?? G?? G?? G?? G?? G?? G?? G?? G?? G?? G?? G?? G?? @@@@@@@@@@@@') ; yourself); yourself] |
|
123 |
||
124 |
"Created: / 15-06-2007 / 18:04:38 / Administrador" |
|
125 |
! |
|
126 |
||
127 |
restartSearchBarIcon |
|
128 |
"This resource specification was automatically generated |
|
129 |
by the ImageEditor of ST/X." |
|
130 |
||
131 |
"Do not manually edit this!! If it is corrupted, |
|
132 |
the ImageEditor may not be able to read the specification." |
|
133 |
||
134 |
" |
|
135 |
self restartSearchBarIcon inspect |
|
136 |
ImageEditor openOnClass:self andSelector:#restartSearchBarIcon |
|
137 |
Icon flushCachedIcons |
|
138 |
" |
|
139 |
||
140 |
<resource: #image> |
|
141 |
||
142 |
^Icon |
|
2434 | 143 |
constantNamed:#'Psiware::SystemManagement class restartSearchBarIcon' |
144 |
ifAbsentPut:[(Depth24Image new) width: 20; height: 20; photometric:(#rgb); bitsPerSample:(#[8 8 8]); samplesPerPixel:(3); bits:(ByteArray fromPackedString:' |
|
2327 | 145 |
@@@@@@@@@@@@@@@@@@@@@@@@?>SX?>''V?>;)?>O!!?>G]?>WY@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@?=3\:[>''5;JF/Y-.+XY),(U. |
146 |
6JZK?=J1?>V<>.+I@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@?>?'':+:!!19]U6*-Q?]Y/?>RC?>*!!?>F_>+=939UL2Y!!L>MJT??W[@@@@@@@@@@@@@@@@@@@@ |
|
147 |
@@@@??[-=\^&1IEP=<Q[?>1/?=5$?=52?>NT?=^Q?>BP?>FG>;1]6JEO8;^H?]3I@@@@@@@@@@@@@@@@@@@@?\*95Y-)<+!!$??.F?>)17+-U8,E40Y-.09I) |
|
148 |
:Z1-?=I??=)8?<1.>K597;NL??K,@@@@@@@@@@@@?=#M6I>B>+:@?>2U=,]]5[IN7,^C5LB[<MWL?]#O=,BZ7)=\>;Y[??FP?=>O1YEW8<B$;=WH@@@@@@@@ |
|
149 |
>,"%8Z:A?>N#?>._5KA$9-JW7=+FX6M+V%U3"''*T0Y>V4ZA7595T=;1"?=&D?=&L,W(93IU\:KE9=LBG9[Q9;K1<?=^R:K591*-6??''[@@@@RE%37>7?=?/? |
|
150 |
>^_''3*.M0YAU<K5,?>ZO?=>G?<!!6?<Y6>+U(69YI3:IG?=Z@?>NU5:=19,6%@@@@@@@@OU5*2.+7;O??5-KF2;JS?=*&?>&"?=.E?>2R?=&F?>"X8I-N5)ED |
|
151 |
29$&?>M:?=*F3:E&>]/A@@@@@@@@O5=.7O??5^/(?O++<M.>0I-/;LNE??2)?=&B?>^%,W)A8:14?=FX3)TR?>U/?=Q:3IAZ?=?T@@@@@@@@P5Y68_#?7.70 |
|
152 |
??[1??C_:,F%6;A=>MJA?>6":,6+&G91?>+^?>+]79<$?<1\?=:C5IM[?<;F@@@@@@@@Q$1>6N_?<?+?<.W.?>3*??S(=,.(2Z!!#=-:^+9>P4,[P<>''46=O^ |
|
153 |
=+MX;Z)O?>^Q:Z]*;+Z''@@@@@@@@TD:O9^/?;/C??>???>/:?>71?>7Z;]^%0+JA7=CI8]O"0+[D8=#&?<&V79="?=2L?\E88[BG@@@@@@@@VU&M=_3?9N''? |
|
154 |
>/C???K??NK/??[1???#9M?B??3;(IV#/[WD;^_5@@@@;KR]<[10?=Q68[9,8,>W@@@@TU9&;/??9__9:.;/?_#<??/?>?[==?79>_?=<_S9T5M[0,WN7^G* |
|
155 |
@@@@@@@@1Y= >=!!>9,]-3[],6]B''TEH=;O_''=O?6>O77>O''=>//?=_+?:O_?:_''?>O??SEM[/<[P6.O,@@@@@@@@8-F%1*%/9[>@?>R(7+VG_%,;\E]CW$=H |
|
156 |
U5AWV5%.U5);R5M:Q5M;S%-=TE]*[GI>):696M;*@@@@@@@@@@@@6\F[2Y914)9.;[VF?L"!!8[^_3J>''0KB:0;?V0,_''-<C),K/(,;7!!+[OI,K[D2=G_9N+8 |
|
157 |
@@@@@@@@@@@@@@@@@@@@?\*_7*]>3))5/II9+9FF+9> 0;7I5-#-7NO?7^#?8^/?:/G?7NK07>W3@@@@@@@@@@@@@@@@@@@@@@@@?>N;?>N;?=:9?>7T?>#X |
|
158 |
>^_%=N?6<OK?@@@@@@@@@@@@@@@@@@@@@@@@@@@@') ; mask:((Depth1Image new) width: 20; height: 20; photometric:(#blackIs0); bitsPerSample:(#[1]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@?@OC?0OO?8O_?<O_?>O???O?????_??>_??>_??>_??>_??>_??>_??__??O???O???G???A??/A? O') ; yourself); yourself] |
|
159 |
! |
|
160 |
||
161 |
searchNextIcon |
|
162 |
"This resource specification was automatically generated |
|
163 |
by the ImageEditor of ST/X." |
|
164 |
||
165 |
"Do not manually edit this!! If it is corrupted, |
|
166 |
the ImageEditor may not be able to read the specification." |
|
167 |
||
168 |
" |
|
169 |
self searchNextIcon inspect |
|
170 |
ImageEditor openOnClass:self andSelector:#searchNextIcon |
|
171 |
Icon flushCachedIcons |
|
172 |
" |
|
173 |
||
174 |
<resource: #image> |
|
175 |
||
176 |
^Icon |
|
2434 | 177 |
constantNamed:#'Psiware::SystemManagement class searchNextIcon' |
178 |
ifAbsentPut:[(Depth8Image new) width: 22; height: 22; photometric:(#palette); bitsPerSample:(#[8]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:' |
|
2327 | 179 |
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ZE)ZZ@@@@@@@@@@@@@@@ |
180 |
@@@@@@AFF XA@PXUQ @@@@@@@@@@@@@@@@@*@Q5G^WX6E0D*@@@@@@@@@@@@@@@,AVQ?\&1#W&X8@20@@@@@@@@@@@A[@U==\F-"VUQOUSLAV0@@@@@@@@@@ |
|
181 |
G19-D <NCP0KB!!@7D1<@@@@@@@@@ ]MT5JY&Y&Y&Y%RLR4G @@@@@@@H\A WL $)&Y&Y&RF35B@X\@@@@@@@BK@XA1WA"X&Y&XE#T:P@FK@@@@@@@@# !!H |
|
182 |
]F$<II&YH3H>N2 H# @@@@@@@@@''GG)*Y2$9NRIDO4DQHP@@@@@@@@@@!!@EP[6U]I"UIQTL.@XP@@@@@@@@@@@ALAD-.XE]VS$(/@$0@@@@@@@@@@@@@@EDA |
|
183 |
FSQ!!VC@T@UD@@@@@@@@@@@@@@@@@#R,I@PDIJ84@@@@@@@@@@@@@@@@@@@@@%)^W% @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ |
|
184 |
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@a') ; colorMapFromArray:#[0 0 0 48 54 77 55 63 87 56 64 89 57 67 90 59 67 90 64 69 89 71 74 92 72 76 96 76 81 100 80 89 118 82 90 119 83 91 120 84 92 122 86 94 123 87 96 124 89 97 126 92 104 132 97 106 136 97 110 138 97 112 138 100 102 112 101 107 130 104 118 144 105 113 135 105 124 146 107 109 118 107 116 144 110 127 148 112 126 148 113 129 148 117 119 129 118 130 156 119 123 133 125 140 174 127 131 146 127 132 148 127 146 178 130 151 181 131 132 143 133 149 185 133 152 182 134 134 138 137 140 150 138 138 142 139 156 191 141 160 195 143 164 199 143 169 198 144 157 197 144 158 197 152 173 208 153 184 209 155 167 210 156 180 208 157 179 215 157 180 211 160 162 171 160 173 216 160 174 216 160 182 214 161 173 217 161 174 217 161 176 219 161 179 220 161 180 220 163 182 222 163 184 222 164 182 222 164 184 223 166 164 161 166 189 212 166 194 211 167 190 228 167 194 229 167 200 221 169 170 174 169 195 212 169 196 232 170 181 228 170 203 221 171 171 176 171 173 182 171 193 220 173 182 232 173 192 232 173 200 234 175 206 239 175 210 240 176 188 237 178 175 168 178 175 173 178 202 234 178 206 240 179 195 238 180 205 223 180 214 243 180 216 244 181 193 242 181 195 239 181 204 223 181 212 243 182 206 242 182 209 243 184 180 173 184 211 244 184 215 245 185 198 246 185 200 244 188 215 233 188 225 249 189 226 249 190 206 250 190 219 248 191 209 249 191 217 248 191 222 248 192 188 181 192 221 249 194 190 184 195 191 184 196 226 251 196 232 251 199 196 189 202 198 191 202 226 253 203 199 193 203 229 253 203 237 252 203 237 253 204 202 196 206 202 195 206 205 204 207 203 196 208 204 197 208 205 201 212 208 200 212 208 201 212 208 202 212 209 205 213 210 202 213 212 213 214 211 206 215 212 207 216 213 206 218 215 210 220 221 223 221 219 214 222 219 215 222 220 215 230 228 225 236 235 232 243 243 244 255 255 255]; mask:((Depth1Image new) width: 22; height: 22; photometric:(#blackIs0); bitsPerSample:(#[1]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@C@@@C@@@C@G C@_8C@?<CA?>CC??CC??CG??#G??#G??#G??#C??CC??CA?>C@?<C@_8C@G C@@@C@@@C@@@C') ; yourself); yourself] |
|
185 |
! |
|
186 |
||
187 |
searchPreviousIcon |
|
188 |
"This resource specification was automatically generated |
|
189 |
by the ImageEditor of ST/X." |
|
190 |
||
191 |
"Do not manually edit this!! If it is corrupted, |
|
192 |
the ImageEditor may not be able to read the specification." |
|
193 |
||
194 |
" |
|
195 |
self searchPreviousIcon inspect |
|
196 |
ImageEditor openOnClass:self andSelector:#searchPreviousIcon |
|
197 |
Icon flushCachedIcons |
|
198 |
" |
|
199 |
||
200 |
<resource: #image> |
|
201 |
||
202 |
^Icon |
|
2434 | 203 |
constantNamed:#'Psiware::SystemManagement class searchPreviousIcon' |
204 |
ifAbsentPut:[(Depth8Image new) width: 22; height: 22; photometric:(#palette); bitsPerSample:(#[8]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:' |
|
2327 | 205 |
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@%)^W% @@@@@@@@@@@@@@ |
206 |
@@@@@@BMJ0$A@P$+#P@@@@@@@@@@@@@@@@AQ@Q$4XU 0E@EQ@@@@@@@@@@@@@@ALAD-.XE]VS$(/@$0@@@@@@@@@@@BD@UA/YU4&IT%EP28A!!@@@@@@@@@@@ |
|
207 |
I11:Z&\)NS$"QC=ADRD@@@@@@@@@# !!H]F$<II&YH3H>N2 H# @@@@@@@H,A GE\FI"Y&Y VMS)@@X,@@@@@@@BG@XE3HIJY&Y&Y$!!,=P FG@@@@@@@@ ]M |
|
208 |
T5JY&Y&Y&Y%RLR4G @@@@@@@@@_G&4RC08MC@,JDC\SG0@@@@@@@@@@V0E__WA+X%%TS5T3@U,@@@@@@@@@@@@,AVQ?\&1#W&X8@20@@@@@@@@@@@@@@B(A |
|
209 |
GT]9]#XW@R(@@@@@@@@@@@@@@@@@Q!!(F@PDFETX@@@@@@@@@@@@@@@@@@@@@ZE)ZZ@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ |
|
210 |
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@a') ; colorMapFromArray:#[0 0 0 48 54 77 55 63 87 56 64 89 57 67 90 59 67 90 64 69 89 71 74 92 72 76 96 76 81 100 80 89 118 82 90 119 83 91 120 84 92 122 86 94 123 87 96 124 89 97 126 92 104 132 97 106 136 97 110 138 97 112 138 100 102 112 101 107 130 104 118 144 105 113 135 105 124 146 107 109 118 107 116 144 110 127 148 112 126 148 113 129 148 117 119 129 118 130 156 119 123 133 125 140 174 127 131 146 127 132 148 127 146 178 130 151 181 131 132 143 133 149 185 133 152 182 134 134 138 137 140 150 138 138 142 139 156 191 141 160 195 143 164 199 143 169 198 144 157 197 144 158 197 152 173 208 153 184 209 155 167 210 156 180 208 157 179 215 157 180 211 160 162 171 160 173 216 160 174 216 160 182 214 161 173 217 161 174 217 161 176 219 161 179 220 161 180 220 163 182 222 163 184 222 164 182 222 164 184 223 166 164 161 166 189 212 166 194 211 167 190 228 167 194 229 167 200 221 169 170 174 169 195 212 169 196 232 170 181 228 170 203 221 171 171 176 171 173 182 171 193 220 173 182 232 173 192 232 173 200 234 175 206 239 175 210 240 176 188 237 178 175 168 178 175 173 178 202 234 178 206 240 179 195 238 180 205 223 180 214 243 180 216 244 181 193 242 181 195 239 181 204 223 181 212 243 182 206 242 182 209 243 184 180 173 184 211 244 184 215 245 185 198 246 185 200 244 188 215 233 188 225 249 189 226 249 190 206 250 190 219 248 191 209 249 191 217 248 191 222 248 192 188 181 192 221 249 194 190 184 195 191 184 196 226 251 196 232 251 199 196 189 202 198 191 202 226 253 203 199 193 203 229 253 203 237 252 203 237 253 204 202 196 206 202 195 206 205 204 207 203 196 208 204 197 208 205 201 212 208 200 212 208 201 212 208 202 212 209 205 213 210 202 213 212 213 214 211 206 215 212 207 216 213 206 218 215 210 220 221 223 221 219 214 222 219 215 222 220 215 230 228 225 236 235 232 243 243 244 255 255 255]; mask:((Depth1Image new) width: 22; height: 22; photometric:(#blackIs0); bitsPerSample:(#[1]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@C@@@C@@@C@G C@_8C@?<CA?>CC??CC??CG??#G??#G??#G??#C??CC??CA?>C@?<C@_8C@G C@@@C@@@C@@@C') ; yourself); yourself] |
|
211 |
! |
|
212 |
||
213 |
searchToolBarIcon |
|
214 |
"This resource specification was automatically generated |
|
215 |
by the ImageEditor of ST/X." |
|
216 |
||
217 |
"Do not manually edit this!! If it is corrupted, |
|
218 |
the ImageEditor may not be able to read the specification." |
|
219 |
||
220 |
" |
|
221 |
self searchToolBarIcon inspect |
|
222 |
ImageEditor openOnClass:self andSelector:#searchToolBarIcon |
|
223 |
Icon flushCachedIcons |
|
224 |
" |
|
225 |
||
226 |
<resource: #image> |
|
227 |
||
228 |
^Icon |
|
2434 | 229 |
constantNamed:#'Psiware::SystemManagement class searchToolBarIcon' |
230 |
ifAbsentPut:[(Depth24Image new) width: 22; height: 22; photometric:(#rgb); bitsPerSample:(#[8 8 8]); samplesPerPixel:(3); bits:(ByteArray fromPackedString:' |
|
2327 | 231 |
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ |
232 |
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ |
|
233 |
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@4][>4][>@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ |
|
234 |
@@@@@@@@@@@@@@@@@@@@@@@@@@@@;>#8/L#+!!:KS!!:KS/,'',;>''9@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@2];>^)WH |
|
235 |
NE:+KU*:J5&9NE6*_I#K4^S>@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@4][>RV3DLER"SWR6$K#0#;[.SGJ4L5"''UG_N4][>@@@@ |
|
236 |
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@*K''\JT*,U6Z7:^S?>/C*;.3,6>C>RFF(KEZ"3-_-@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ |
|
237 |
@@@@@@@@@@@@&Z''HFTF &Z7">N#:7NK?7NK?6=W>!!Y''YH4N -+3T@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@%I>;FDV)#ZWU??''57NK? |
|
238 |
7NK?:>_?\8WKFCN".K#T@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@1L;.A#V[O5")3=W;=/[4</W:1,??K$JVI4Z\7-''4@@@@@@@@@@@@ |
|
239 |
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@7NK?-,[1E#:&C"ZZH3F U6_EU63FHS^XHS.K JOX7-''4@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@7NK? |
|
240 |
,K_*O5ZTCRBLPU&0FCBHDB&RDR6RH$NI Y#I4][>@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@7NK?-;#%ND&KC">BYV.*4=;>7.+>-<K!!,K/!!7NK? |
|
241 |
:^C;@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@7NK?/K3^PT%<CBI/NE>==O;8@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ |
|
242 |
@@@@@@@@@@@@7NK? (J9GB1SZV>W:M3?@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@5MS&++3H6M/#@@@@ |
|
243 |
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@7NK?@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ |
|
244 |
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ |
|
245 |
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ |
|
246 |
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ |
|
247 |
@@@@@@@@@@@@@@@@') ; mask:((Depth1Image new) width: 22; height: 22; photometric:(#blackIs0); bitsPerSample:(#[1]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@C@@@C@@@C@A C@G8C@O<C@_>C@_>C@_>C@_>C@_>C@?>CA?<CC?8CG8@CG0@CC @CA@@C@@@C@@@C@@@C@@@C') ; yourself); yourself] |
|
248 |
! |
|
249 |
||
250 |
warningSearchBarIcon |
|
251 |
"This resource specification was automatically generated |
|
252 |
by the ImageEditor of ST/X." |
|
253 |
||
254 |
"Do not manually edit this!! If it is corrupted, |
|
255 |
the ImageEditor may not be able to read the specification." |
|
256 |
||
257 |
" |
|
258 |
self warningSearchBarIcon inspect |
|
259 |
ImageEditor openOnClass:self andSelector:#warningSearchBarIcon |
|
260 |
Icon flushCachedIcons |
|
261 |
" |
|
262 |
||
263 |
<resource: #image> |
|
264 |
||
265 |
^Icon |
|
2434 | 266 |
constantNamed:#'Psiware::SystemManagement class warningSearchBarIcon' |
267 |
ifAbsentPut:[(Depth24Image new) width: 22; height: 19; photometric:(#rgb); bitsPerSample:(#[8 8 8]); samplesPerPixel:(3); bits:(ByteArray fromPackedString:' |
|
2327 | 268 |
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@?:.+<Y"P??C\@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@>_;?@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ |
269 |
@@@@?]SZ)5]X.6!! -HM2??''*@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@?>39-7*B4H&G>[N+%%MJ>\#A@@@@@@@@ |
|
270 |
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@<+R?*U1&?=CN?>W^4HJ@+FY$?>+"@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ |
|
271 |
@@@@@@@@@@@@@@@@@@@@?>G_)U!!^>Z^->,B><+"4?*^-%C8?;;Z+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@??#1-(E;.65+?<#H |
|
272 |
?=_T?=GP?::65W-=(EQF?>WQ@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@?\#D*VAY?;61<;"0;,C@6J^+;*"0>ZN$&CX)6(-:@@@@@@@@ |
|
273 |
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@?>#+/7Q148E6?<"4<L&:W#(:G@@@392!!48^G9WM(%24_?=WN@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ |
|
274 |
??C?7Y&$.E5\?;V*=<:8??K_R3X5DP@@4+R49ZZ!!7VIZ/#85)%UR??G/@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@?=7.2&)6=IJQ?;..=]W@??7*PS$7E@,N |
|
275 |
4<OC?>K^>(M=1S8;)$ID8Y6^@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@;HNR4U%%<)&S?<^9??_(??;3REEN@P,J2<[C??K/?:R!!/C8?&R(0(T-N?>GZ@@@@ |
|
276 |
@@@@@@@@@@@@@@@@@@@@?<;H,31B3T9U2'')1?L3@?>3&=^7*XWE0@@<M7=;\??S3?=_U46-,#Q(!!$B,/18"A@@@@@@@@@@@@@@@@@@@@??G&1G!!*,S03)SP, |
|
277 |
3()?>=WL??_:<>33[G:@D2T%;^/,??#8??K19Y6^&R(0!!QPX#S8:;K22@@@@@@@@@@@@@@@@<*RZ+5I@*$D+*T48<[N&?>C_7,+U??3?7N''/(J.-?/+;??W5 |
|
278 |
;.O!!?>G_3&]+ 0(O#B8.(U9X@@@@@@@@@@@@?<?Y/%MM.487%$P^7I)7?<&=?=+ <^W3;?C?YV]3JR .-*60=/W35.[#<>W"?:*+*3@3$R\)^R ''2)^T@@@@ |
|
279 |
?>K2;(ZO2DQ@-SP!!,5H/?<F!!?<V=?;3B?=_"?>7:)72EUBT+<,GD?>?,<M;Z>]GO?<#J8VM& P4P_A0^ C(:?>+''?:"+34%H13L/02("13T(13\,5$H>3S<= |
|
280 |
1TMC0DQD/$IB/D@>.S4;-S,8,C(:,C 9-3X:(A4""@4R_1DT RH&/6%*?82D/S8503873C<85C<923H,23@+/RP\-"HX,"HW+"DX*"@V)10U)1(S)!!XU)AXU |
|
281 |
(Q0_$1XZ#1X["A(]^QPX&34>?;&).&-Z/6]Y06MU1&AR/5UG15-N0EYF1&EO0&EN/&EP.6AN.%5N.5-M.5%P/UYQ.$)I.4)L0UQW/U-\+5YX5XFA') ; mask:((Depth1Image new) width: 22; height: 19; photometric:(#blackIs0); bitsPerSample:(#[1]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@C G@G0C@O0C@O8C@_8C@?<C@?<CA?>CC??CC??CC??#G??#O??3O??3_??;????????????????') ; yourself); yourself] |
|
282 |
! ! |
|
283 |
||
2015 | 284 |
!InternationalLanguageTranslationEditor class methodsFor:'interface specs'! |
285 |
||
286 |
windowSpec |
|
287 |
"This resource specification was automatically generated |
|
288 |
by the UIPainter of ST/X." |
|
289 |
||
290 |
"Do not manually edit this!! If it is corrupted, |
|
291 |
the UIPainter may not be able to read the specification." |
|
292 |
||
293 |
" |
|
2048 | 294 |
UIPainter new openOnClass:Tools::InternationalLanguageTranslationEditor andSelector:#windowSpec |
295 |
Tools::InternationalLanguageTranslationEditor new openInterface:#windowSpec |
|
296 |
Tools::InternationalLanguageTranslationEditor open |
|
2015 | 297 |
" |
298 |
||
299 |
<resource: #canvas> |
|
300 |
||
3245 | 301 |
^ |
302 |
#(FullSpec |
|
303 |
name: windowSpec |
|
304 |
window: |
|
305 |
(WindowSpec |
|
306 |
label: 'InternationalLanguageTranslationEditor' |
|
307 |
name: 'InternationalLanguageTranslationEditor' |
|
308 |
min: (Point 10 10) |
|
309 |
bounds: (Rectangle 0 0 774 610) |
|
310 |
menu: mainMenu |
|
311 |
) |
|
312 |
component: |
|
313 |
(SpecCollection |
|
314 |
collection: ( |
|
315 |
(MenuPanelSpec |
|
316 |
name: 'ToolBar' |
|
317 |
layout: (LayoutFrame 0 0 0 0 0 1 30 0) |
|
318 |
menu: menuToolBar |
|
319 |
textDefault: true |
|
320 |
) |
|
321 |
(VariableVerticalPanelSpec |
|
322 |
name: 'TranslationsVariableVerticalPanel' |
|
323 |
layout: (LayoutFrame 0 0 30 0 0 1 -32 1) |
|
324 |
component: |
|
325 |
(SpecCollection |
|
326 |
collection: ( |
|
327 |
(DataSetSpec |
|
328 |
name: 'KeyStringAndLanguageSelectionTable' |
|
329 |
model: selectedKeyRow |
|
330 |
menu: keyStringAndLanguageSelectionTableMenu |
|
331 |
hasHorizontalScrollBar: true |
|
332 |
hasVerticalScrollBar: true |
|
333 |
dataList: keyStringAndLanguageSelectionTable |
|
334 |
columnHolder: keyStringAndLanguageSelectionTableColumnDescriptionHolder |
|
335 |
beDependentOfRows: true |
|
336 |
columnAdaptor: yourself |
|
337 |
postBuildCallback: postBuildDataSet: |
|
338 |
) |
|
339 |
(VariableVerticalPanelSpec |
|
340 |
name: 'VariableVerticalPanel1' |
|
341 |
component: |
|
342 |
(SpecCollection |
|
343 |
collection: ( |
|
344 |
(ViewSpec |
|
345 |
name: 'Box1' |
|
346 |
component: |
|
347 |
(SpecCollection |
|
348 |
collection: ( |
|
349 |
(LabelSpec |
|
350 |
label: 'Original String (Key):' |
|
351 |
name: 'Label2' |
|
352 |
layout: (LayoutFrame 0 0 -2 0 0 1 28 0) |
|
353 |
translateLabel: true |
|
354 |
adjust: left |
|
355 |
) |
|
356 |
(TextEditorSpec |
|
357 |
name: 'OriginalText' |
|
358 |
layout: (LayoutFrame 0 0 27 0 0 1 -2 1) |
|
359 |
model: originalTextHolder |
|
360 |
hasHorizontalScrollBar: true |
|
361 |
hasVerticalScrollBar: true |
|
362 |
modifiedChannel: originalTextModifiedHolder |
|
363 |
acceptCallBack: languageTextAccepted |
|
364 |
hasKeyboardFocusInitially: false |
|
365 |
) |
|
366 |
) |
|
367 |
||
368 |
) |
|
369 |
) |
|
370 |
(ViewSpec |
|
371 |
name: 'Box3' |
|
372 |
component: |
|
373 |
(SpecCollection |
|
374 |
collection: ( |
|
375 |
(LabelSpec |
|
376 |
label: 'Select Another Language as example:' |
|
377 |
name: 'Label3' |
|
378 |
layout: (LayoutFrame 0 0 -6 0 0 1 24 0) |
|
379 |
translateLabel: true |
|
380 |
adjust: left |
|
381 |
) |
|
382 |
(ComboBoxSpec |
|
383 |
name: 'ComboBox1' |
|
384 |
layout: (LayoutFrame 281 0 -2 0 406 0 18 0) |
|
385 |
model: exampleLanguageSelectionHolder |
|
386 |
immediateAccept: false |
|
387 |
acceptOnLeave: true |
|
388 |
acceptOnLostFocus: true |
|
389 |
acceptOnPointerLeave: false |
|
390 |
comboList: shownLanguages |
|
391 |
useIndex: false |
|
392 |
) |
|
393 |
(TextEditorSpec |
|
394 |
name: 'ExampleLanguageText' |
|
395 |
layout: (LayoutFrame 0 0 30 0 0 1 0 1) |
|
396 |
model: exampleLanguageTextHolder |
|
397 |
hasHorizontalScrollBar: true |
|
398 |
hasVerticalScrollBar: true |
|
399 |
isReadOnly: true |
|
400 |
hasKeyboardFocusInitially: false |
|
401 |
) |
|
402 |
) |
|
403 |
||
404 |
) |
|
405 |
) |
|
406 |
(ViewSpec |
|
407 |
name: 'Box2' |
|
408 |
component: |
|
409 |
(SpecCollection |
|
410 |
collection: ( |
|
411 |
(LabelSpec |
|
412 |
label: 'Translated String:' |
|
413 |
name: 'Label1' |
|
414 |
layout: (LayoutFrame 0 0 0 0 0 1 30 0) |
|
415 |
translateLabel: true |
|
416 |
adjust: left |
|
417 |
) |
|
418 |
(TextEditorSpec |
|
419 |
name: 'LanguageText' |
|
420 |
layout: (LayoutFrame 0 0 30 0 0 1 0 1) |
|
421 |
model: languageTextHolder |
|
422 |
hasHorizontalScrollBar: true |
|
423 |
hasVerticalScrollBar: true |
|
424 |
acceptChannel: languageTextAcceptHolder |
|
425 |
modifiedChannel: languageTextModifiedHolder |
|
426 |
acceptCallBack: languageTextAccepted |
|
427 |
hasKeyboardFocusInitially: false |
|
428 |
postBuildCallback: languageEditorBuilt: |
|
429 |
) |
|
430 |
(ActionButtonSpec |
|
431 |
label: 'Paste Previous' |
|
432 |
name: 'pastePreviousTranslation' |
|
433 |
layout: (LayoutOrigin 0 0.83085250338295003 0 0.034482758620689995) |
|
434 |
translateLabel: true |
|
435 |
model: pastePreviousTranslationInLanguageText |
|
436 |
enableChannel: pastePreviousTranslationEnableHolder |
|
437 |
disabledLogo: 'Paste Previous' |
|
438 |
) |
|
439 |
(ActionButtonSpec |
|
440 |
label: 'Paste Original' |
|
441 |
name: 'Button1' |
|
442 |
layout: (LayoutOrigin -95 0.83085250338295003 0 0.034482758620689995) |
|
443 |
translateLabel: true |
|
444 |
model: pasteOriginalInLanguageText |
|
445 |
enableChannel: pasteOriginalEnableHolder |
|
446 |
disabledLogo: 'Paste Original' |
|
447 |
) |
|
448 |
) |
|
449 |
||
450 |
) |
|
451 |
) |
|
452 |
) |
|
453 |
||
454 |
) |
|
455 |
handles: (Any 0.33333333333333004 0.66666666666667007 1.0) |
|
456 |
) |
|
457 |
) |
|
458 |
||
459 |
) |
|
460 |
handles: (Any 0.5 1.0) |
|
461 |
postBuildCallback: postBuildTranslationsPanel: |
|
462 |
) |
|
463 |
(ViewSpec |
|
464 |
name: 'SearchBox' |
|
465 |
layout: (LayoutFrame 0 0 -32 1 0 1 0 1) |
|
466 |
level: -1 |
|
467 |
visibilityChannel: searchBoxVisible |
|
468 |
component: |
|
469 |
(SpecCollection |
|
470 |
collection: ( |
|
471 |
(ActionButtonSpec |
|
472 |
label: 'closeSearchBarIcon' |
|
473 |
name: 'closeSearchBarButton' |
|
474 |
layout: (LayoutFrame 4 0 5 0 25 0 26 0) |
|
475 |
hasCharacterOrientedLabel: false |
|
476 |
translateLabel: true |
|
477 |
model: closeSearchBar |
|
478 |
) |
|
479 |
(LabelSpec |
|
480 |
label: 'Search:' |
|
481 |
name: 'SearchLabel' |
|
482 |
layout: (LayoutFrame 30 0 5 0 81 0 27 0) |
|
483 |
translateLabel: true |
|
484 |
adjust: right |
|
485 |
) |
|
486 |
(InputFieldSpec |
|
487 |
name: 'SearchEntryField' |
|
488 |
layout: (LayoutFrame 87 0 5 0 244 0 27 0) |
|
489 |
model: searchTextHolder |
|
490 |
immediateAccept: true |
|
491 |
acceptOnReturn: true |
|
492 |
acceptOnTab: true |
|
493 |
acceptOnLostFocus: true |
|
494 |
modifiedChannel: searchTextModifiedHolder |
|
495 |
acceptOnPointerLeave: false |
|
496 |
postBuildCallback: postBuildSearchTextView: |
|
497 |
) |
|
498 |
(ActionButtonSpec |
|
499 |
label: 'searchNextIcon' |
|
500 |
name: 'SearchNextButton' |
|
501 |
layout: (LayoutFrame 251 0 5 0 272 0 26 0) |
|
502 |
hasCharacterOrientedLabel: false |
|
503 |
translateLabel: true |
|
504 |
model: searchNextText |
|
505 |
) |
|
506 |
(ActionButtonSpec |
|
507 |
label: 'searchPreviousIcon' |
|
508 |
name: 'searchPreviousButton' |
|
509 |
layout: (LayoutFrame 279 0 5 0 300 0 26 0) |
|
510 |
hasCharacterOrientedLabel: false |
|
511 |
translateLabel: true |
|
512 |
model: searchPreviousText |
|
513 |
) |
|
514 |
(CheckBoxSpec |
|
515 |
label: 'Ignore case' |
|
516 |
name: 'IgnoreCaseCheckBox' |
|
517 |
layout: (LayoutFrame 309 0 5 0 505 0 27 0) |
|
518 |
model: ignoreCaseHolder |
|
519 |
translateLabel: true |
|
520 |
) |
|
521 |
(LabelSpec |
|
522 |
label: 'SearchBarImageInfoLabel' |
|
523 |
name: 'SearchBarImageInfoLabel' |
|
524 |
layout: (LayoutFrame 511 0 5 0 535 0 27 0) |
|
525 |
hasCharacterOrientedLabel: false |
|
526 |
translateLabel: true |
|
527 |
labelChannel: searchBarImageInfoLabelHolder |
|
528 |
) |
|
529 |
(LabelSpec |
|
530 |
label: 'SearchBarInfoLabel' |
|
531 |
name: 'SearchBarInfoLabel' |
|
532 |
layout: (LayoutFrame 538 0 5 0 816 0 27 0) |
|
533 |
translateLabel: true |
|
534 |
labelChannel: searchBarInfoLabelHolder |
|
535 |
adjust: left |
|
536 |
) |
|
537 |
) |
|
538 |
||
539 |
) |
|
540 |
postBuildCallback: postBuildSearchBoxView: |
|
541 |
) |
|
542 |
) |
|
543 |
||
544 |
) |
|
545 |
) |
|
2015 | 546 |
! ! |
547 |
||
548 |
!InternationalLanguageTranslationEditor class methodsFor:'menu specs'! |
|
549 |
||
2163 | 550 |
keyStringAndLanguageSelectionTableMenu |
551 |
"This resource specification was automatically generated |
|
552 |
by the MenuEditor of ST/X." |
|
553 |
||
554 |
"Do not manually edit this!! If it is corrupted, |
|
555 |
the MenuEditor may not be able to read the specification." |
|
556 |
||
557 |
" |
|
558 |
MenuEditor new openOnClass:Tools::InternationalLanguageTranslationEditor andSelector:#keyStringAndLanguageSelectionTableMenu |
|
559 |
(Menu new fromLiteralArrayEncoding:(Tools::InternationalLanguageTranslationEditor keyStringAndLanguageSelectionTableMenu)) startUp |
|
560 |
" |
|
561 |
||
562 |
<resource: #menu> |
|
563 |
||
2434 | 564 |
^ |
2163 | 565 |
#(Menu |
2434 | 566 |
( |
567 |
(MenuItem |
|
568 |
label: 'Set Current NameSpace' |
|
569 |
itemValue: changeLastNameSpace |
|
570 |
translateLabel: true |
|
571 |
) |
|
572 |
(MenuItem |
|
573 |
label: 'Search String in Current NameSpace' |
|
574 |
itemValue: searchStringInLastNameSpace |
|
575 |
translateLabel: true |
|
576 |
) |
|
577 |
(MenuItem |
|
578 |
label: '-' |
|
579 |
isVisible: #false |
|
580 |
) |
|
581 |
(MenuItem |
|
582 |
label: 'Set Current Package' |
|
583 |
itemValue: changeLastPackage |
|
584 |
translateLabel: true |
|
585 |
isVisible: #false |
|
586 |
) |
|
587 |
(MenuItem |
|
588 |
label: 'Search String in Current Package' |
|
589 |
itemValue: searchStringInLastPackage |
|
590 |
translateLabel: true |
|
591 |
isVisible: #false |
|
592 |
) |
|
593 |
) |
|
594 |
nil |
|
595 |
nil |
|
2163 | 596 |
) |
597 |
! |
|
598 |
||
2015 | 599 |
mainMenu |
600 |
"This resource specification was automatically generated |
|
601 |
by the MenuEditor of ST/X." |
|
602 |
||
603 |
"Do not manually edit this!! If it is corrupted, |
|
604 |
the MenuEditor may not be able to read the specification." |
|
605 |
||
3189
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
606 |
|
2015 | 607 |
" |
2050 | 608 |
MenuEditor new openOnClass:Tools::InternationalLanguageTranslationEditor andSelector:#mainMenu |
609 |
(Menu new fromLiteralArrayEncoding:(Tools::InternationalLanguageTranslationEditor mainMenu)) startUp |
|
2015 | 610 |
" |
611 |
||
612 |
<resource: #menu> |
|
613 |
||
3189
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
614 |
^ |
2015 | 615 |
#(Menu |
3189
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
616 |
( |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
617 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
618 |
label: 'File' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
619 |
submenu: |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
620 |
(Menu |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
621 |
( |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
622 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
623 |
label: 'New' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
624 |
itemValue: menuNew |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
625 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
626 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
627 |
label: '-' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
628 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
629 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
630 |
label: 'Open Resources for Package or Project...' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
631 |
itemValue: menuOpenByPackage |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
632 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
633 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
634 |
label: 'Open Resource File...' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
635 |
itemValue: menuOpen |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
636 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
637 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
638 |
label: '-' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
639 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
640 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
641 |
label: 'Save All Resource Files' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
642 |
itemValue: menuSaveAll |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
643 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
644 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
645 |
label: 'Save Resource File' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
646 |
itemValue: menuSave |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
647 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
648 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
649 |
label: 'Save Resource File As...' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
650 |
itemValue: menuSaveAs |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
651 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
652 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
653 |
label: '-' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
654 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
655 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
656 |
label: 'Import existing translations from file...' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
657 |
itemValue: importExistingTranslationsFromFile |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
658 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
659 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
660 |
label: '-' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
661 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
662 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
663 |
label: 'Set Current NameSpace' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
664 |
itemValue: changeLastNameSpace |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
665 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
666 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
667 |
label: 'Set Current Package' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
668 |
itemValue: changeLastPackage |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
669 |
isVisible: #false |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
670 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
671 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
672 |
label: '-' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
673 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
674 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
675 |
label: 'Exit' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
676 |
itemValue: closeRequest |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
677 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
678 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
679 |
nil |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
680 |
nil |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
681 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
682 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
683 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
684 |
label: 'View' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
685 |
submenu: |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
686 |
(Menu |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
687 |
( |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
688 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
689 |
label: 'Show Missing Translations Only' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
690 |
indication: showMissingTranslationsOnly |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
691 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
692 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
693 |
label: '-' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
694 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
695 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
696 |
label: 'Shown Languages' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
697 |
submenuChannel: shownLanguagesMenu |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
698 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
699 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
700 |
nil |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
701 |
nil |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
702 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
703 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
704 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
705 |
label: 'Languages' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
706 |
submenu: |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
707 |
(Menu |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
708 |
( |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
709 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
710 |
label: 'Add Language...' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
711 |
itemValue: addLanguage |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
712 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
713 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
714 |
label: 'Remove Language...' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
715 |
itemValue: removeLanguage |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
716 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
717 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
718 |
nil |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
719 |
nil |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
720 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
721 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
722 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
723 |
label: 'Translations' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
724 |
submenuChannel: translationsMenuSpec |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
725 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
726 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
727 |
label: 'Preferences' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
728 |
submenu: |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
729 |
(Menu |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
730 |
( |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
731 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
732 |
label: 'Auto Accept Changes' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
733 |
indication: autoAcceptHolder |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
734 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
735 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
736 |
label: 'Search For Similar Translations' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
737 |
indication: searchForSimilarTranslationEnableHolder |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
738 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
739 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
740 |
label: 'Always Write UTF8' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
741 |
indication: alwaysWriteUTF8Holder |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
742 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
743 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
744 |
nil |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
745 |
nil |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
746 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
747 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
748 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
749 |
label: 'Help' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
750 |
startGroup: right |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
751 |
submenu: |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
752 |
(Menu |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
753 |
( |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
754 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
755 |
label: 'Documentation' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
756 |
itemValue: openDocumentation |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
757 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
758 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
759 |
label: '-' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
760 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
761 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
762 |
label: 'About this Application...' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
763 |
itemValue: openAboutThisApplication |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
764 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
765 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
766 |
nil |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
767 |
nil |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
768 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
769 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
770 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
771 |
nil |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
772 |
nil |
2015 | 773 |
) |
774 |
! |
|
775 |
||
2051 | 776 |
menuItemsEditLanguage |
777 |
"This resource specification was automatically generated |
|
778 |
by the MenuEditor of ST/X." |
|
779 |
||
780 |
"Do not manually edit this!! If it is corrupted, |
|
781 |
the MenuEditor may not be able to read the specification." |
|
782 |
||
783 |
" |
|
784 |
MenuEditor new openOnClass:Tools::InternationalLanguageTranslationEditor andSelector:#menu |
|
785 |
(Menu new fromLiteralArrayEncoding:(Tools::InternationalLanguageTranslationEditor menu)) startUp |
|
786 |
" |
|
787 |
||
788 |
<resource: #menu> |
|
789 |
||
2434 | 790 |
^ |
2051 | 791 |
#(Menu |
2434 | 792 |
( |
793 |
(MenuItem |
|
794 |
enabled: pastePreviousTranslationEnableHolder |
|
795 |
label: 'Paste Previous Translation' |
|
796 |
itemValue: pastePreviousTranslationInLanguageText |
|
797 |
nameKey: pastePreviousTranslationInLanguageText |
|
798 |
translateLabel: true |
|
799 |
) |
|
800 |
) |
|
801 |
nil |
|
802 |
nil |
|
2051 | 803 |
) |
804 |
! |
|
805 |
||
2015 | 806 |
menuToolBar |
807 |
"This resource specification was automatically generated |
|
808 |
by the MenuEditor of ST/X." |
|
809 |
||
810 |
"Do not manually edit this!! If it is corrupted, |
|
811 |
the MenuEditor may not be able to read the specification." |
|
812 |
||
2880 | 813 |
|
2015 | 814 |
" |
2051 | 815 |
MenuEditor new openOnClass:Tools::InternationalLanguageTranslationEditor andSelector:#menuToolBar |
816 |
(Menu new fromLiteralArrayEncoding:(Tools::InternationalLanguageTranslationEditor menuToolBar)) startUp |
|
2015 | 817 |
" |
818 |
||
819 |
<resource: #menu> |
|
820 |
||
2880 | 821 |
^ |
2015 | 822 |
#(Menu |
2880 | 823 |
( |
824 |
(MenuItem |
|
825 |
label: 'Save' |
|
826 |
itemValue: menuSave |
|
827 |
translateLabel: true |
|
828 |
isButton: true |
|
829 |
labelImage: (ResourceRetriever XPToolbarIconLibrary saveImageIcon) |
|
830 |
) |
|
831 |
(MenuItem |
|
832 |
label: '-' |
|
833 |
) |
|
834 |
(MenuItem |
|
835 |
label: 'Add Translation' |
|
836 |
itemValue: addTranslation |
|
837 |
translateLabel: true |
|
838 |
isButton: true |
|
839 |
labelImage: (ResourceRetriever XPToolbarIconLibrary newRowIcon) |
|
840 |
) |
|
841 |
(MenuItem |
|
842 |
label: 'Remove Translation' |
|
843 |
itemValue: removeTranslation |
|
844 |
translateLabel: true |
|
845 |
isButton: true |
|
846 |
labelImage: (ResourceRetriever XPToolbarIconLibrary removeRowIcon) |
|
847 |
) |
|
848 |
(MenuItem |
|
849 |
label: '-' |
|
850 |
) |
|
851 |
(MenuItem |
|
852 |
label: 'Search' |
|
853 |
itemValue: search |
|
854 |
translateLabel: true |
|
855 |
isButton: true |
|
856 |
shortcutKey: Ctrlf |
|
857 |
labelImage: (ResourceRetriever #'Tools::InternationalLanguageTranslationEditor' searchToolBarIcon) |
|
858 |
) |
|
859 |
(MenuItem |
|
860 |
label: '' |
|
861 |
) |
|
862 |
(MenuItem |
|
863 |
label: 'Stop Application' |
|
864 |
itemValue: stopApplication |
|
865 |
translateLabel: true |
|
866 |
isButton: true |
|
867 |
isVisible: stopApplicationIconVisibleHolder |
|
868 |
labelImage: (ResourceRetriever XPToolbarIconLibrary stop16x16Icon) |
|
869 |
) |
|
870 |
) |
|
871 |
nil |
|
872 |
nil |
|
2015 | 873 |
) |
3189
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
874 |
! |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
875 |
|
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
876 |
translationsMenuSpec |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
877 |
"This resource specification was automatically generated |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
878 |
by the MenuEditor of ST/X." |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
879 |
|
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
880 |
"Do not manually edit this!! If it is corrupted, |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
881 |
the MenuEditor may not be able to read the specification." |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
882 |
|
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
883 |
|
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
884 |
" |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
885 |
MenuEditor new openOnClass:Tools::InternationalLanguageTranslationEditor andSelector:#translationsMenuSpec |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
886 |
(Menu new fromLiteralArrayEncoding:(Tools::InternationalLanguageTranslationEditor translationsMenuSpec)) startUp |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
887 |
" |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
888 |
|
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
889 |
<resource: #menu> |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
890 |
|
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
891 |
^ |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
892 |
#(Menu |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
893 |
( |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
894 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
895 |
label: 'Add Translation...' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
896 |
itemValue: addTranslation |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
897 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
898 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
899 |
label: 'Remove Translation...' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
900 |
itemValue: removeTranslation |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
901 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
902 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
903 |
label: '-' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
904 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
905 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
906 |
label: 'Extract from Class...' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
907 |
itemValue: extractTranslationsFromClass |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
908 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
909 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
910 |
label: 'Extract from Project...' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
911 |
itemValue: extractTranslationsFromProject |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
912 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
913 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
914 |
label: 'Extract from NameSpace...' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
915 |
itemValue: extractTranslationsFromNameSpace |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
916 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
917 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
918 |
label: '-' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
919 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
920 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
921 |
label: 'Run Application and Collect Translations...' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
922 |
itemValue: runApplicationAndCollectTranslations |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
923 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
924 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
925 |
label: '-' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
926 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
927 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
928 |
label: 'Generate Missing Translations' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
929 |
itemValue: generateMissingTranslations |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
930 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
931 |
(MenuItem |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
932 |
label: 'Generate Missing Translations Slice' |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
933 |
submenuChannel: menuSliceTranslateGenerate |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
934 |
isMenuSlice: true |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
935 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
936 |
) |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
937 |
nil |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
938 |
nil |
4f828e688bf5
Support to automatically generate translations (for testing only)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3187
diff
changeset
|
939 |
) |
2015 | 940 |
! ! |
941 |
||
2433 | 942 |
!InternationalLanguageTranslationEditor class methodsFor:'startup'! |
943 |
||
944 |
openOnFile:aFilename |
|
945 |
|fn| |
|
946 |
||
947 |
fn := aFilename asFilename. |
|
948 |
||
3077
48211023a3c7
class: Tools::InternationalLanguageTranslationEditor
Claus Gittinger <cg@exept.de>
parents:
2880
diff
changeset
|
949 |
^ self new |
48211023a3c7
class: Tools::InternationalLanguageTranslationEditor
Claus Gittinger <cg@exept.de>
parents:
2880
diff
changeset
|
950 |
allButOpen; |
48211023a3c7
class: Tools::InternationalLanguageTranslationEditor
Claus Gittinger <cg@exept.de>
parents:
2880
diff
changeset
|
951 |
readResourceFile:fn asLanguage:fn withoutSuffix baseName; |
48211023a3c7
class: Tools::InternationalLanguageTranslationEditor
Claus Gittinger <cg@exept.de>
parents:
2880
diff
changeset
|
952 |
openWindow; |
48211023a3c7
class: Tools::InternationalLanguageTranslationEditor
Claus Gittinger <cg@exept.de>
parents:
2880
diff
changeset
|
953 |
yourself. |
48211023a3c7
class: Tools::InternationalLanguageTranslationEditor
Claus Gittinger <cg@exept.de>
parents:
2880
diff
changeset
|
954 |
! |
48211023a3c7
class: Tools::InternationalLanguageTranslationEditor
Claus Gittinger <cg@exept.de>
parents:
2880
diff
changeset
|
955 |
|
48211023a3c7
class: Tools::InternationalLanguageTranslationEditor
Claus Gittinger <cg@exept.de>
parents:
2880
diff
changeset
|
956 |
openOnPackage:aPackageId |
48211023a3c7
class: Tools::InternationalLanguageTranslationEditor
Claus Gittinger <cg@exept.de>
parents:
2880
diff
changeset
|
957 |
^ self new |
48211023a3c7
class: Tools::InternationalLanguageTranslationEditor
Claus Gittinger <cg@exept.de>
parents:
2880
diff
changeset
|
958 |
allButOpen; |
48211023a3c7
class: Tools::InternationalLanguageTranslationEditor
Claus Gittinger <cg@exept.de>
parents:
2880
diff
changeset
|
959 |
readResourceFileForPackage:aPackageId; |
48211023a3c7
class: Tools::InternationalLanguageTranslationEditor
Claus Gittinger <cg@exept.de>
parents:
2880
diff
changeset
|
960 |
openWindow; |
48211023a3c7
class: Tools::InternationalLanguageTranslationEditor
Claus Gittinger <cg@exept.de>
parents:
2880
diff
changeset
|
961 |
yourself. |
2433 | 962 |
! ! |
963 |
||
2047 | 964 |
!InternationalLanguageTranslationEditor class methodsFor:'tableColumns specs'! |
965 |
||
966 |
keyTableColumn |
|
967 |
"This resource specification was automatically generated |
|
968 |
by the DataSetBuilder of ST/X." |
|
969 |
||
970 |
"Do not manually edit this!! If it is corrupted, |
|
971 |
the DataSetBuilder may not be able to read the specification." |
|
972 |
||
973 |
" |
|
974 |
DataSetBuilder new openOnClass:Tools::InternationalLanguageTranslationEditor andSelector:#keyTableColumn |
|
975 |
" |
|
976 |
||
977 |
<resource: #tableColumns> |
|
978 |
||
979 |
^#( |
|
980 |
(DataSetColumnSpec |
|
2434 | 981 |
label: 'Key' |
982 |
labelButtonType: Button |
|
983 |
minWidth: 50 |
|
984 |
model: keyStringInRow: |
|
2047 | 985 |
) |
986 |
) |
|
987 |
! |
|
988 |
||
989 |
languageTableColumn |
|
990 |
"This resource specification was automatically generated |
|
991 |
by the DataSetBuilder of ST/X." |
|
992 |
||
993 |
"Do not manually edit this!! If it is corrupted, |
|
994 |
the DataSetBuilder may not be able to read the specification." |
|
995 |
||
996 |
" |
|
2049 | 997 |
DataSetBuilder new openOnClass:Tools::InternationalLanguageTranslationEditor andSelector:#languageTableColumn |
2047 | 998 |
" |
999 |
||
1000 |
<resource: #tableColumns> |
|
1001 |
||
1002 |
^#( |
|
2049 | 1003 |
(DataSetColumnSpec |
2434 | 1004 |
label: lang |
1005 |
labelButtonType: Button |
|
1006 |
minWidth: 50 |
|
1007 |
editorType: None |
|
1008 |
model: columnInRow:at: |
|
1009 |
backgroundSelector: getBackgroundForRow:rowNr:col: |
|
2049 | 1010 |
) |
1011 |
) |
|
1012 |
! ! |
|
1013 |
||
1014 |
!InternationalLanguageTranslationEditor methodsFor:'accessing'! |
|
2047 | 1015 |
|
2434 | 1016 |
currentSelectionIndex |
2327 | 1017 |
|
1018 |
^ self selectedKeyRow value |
|
1019 |
||
1020 |
"Created: / 16-06-2007 / 09:04:11 / Administrador" |
|
1021 |
"Modified: / 19-06-2007 / 17:28:38 / Administrador" |
|
1022 |
! |
|
1023 |
||
1024 |
exists: anObject |
|
1025 |
||
1026 |
^self objectsList includes: anObject |
|
1027 |
||
1028 |
"Created: / 19-06-2007 / 16:42:22 / Administrador" |
|
1029 |
! |
|
1030 |
||
1031 |
indexOf: anObject |
|
1032 |
||
1033 |
^self objectsList indexOf: anObject |
|
1034 |
||
1035 |
"Created: / 19-06-2007 / 16:39:44 / Administrador" |
|
1036 |
! |
|
1037 |
||
2049 | 1038 |
newLanguageText |
1039 |
"/ languageEditor accept |
|
3245 | 1040 |
^self languageTextHolder value isEmptyOrNil |
1041 |
ifTrue:[''] |
|
1042 |
ifFalse:[self languageTextHolder value asCollectionOfLines first.] |
|
2050 | 1043 |
! |
1044 |
||
2327 | 1045 |
objectsList |
1046 |
||
2434 | 1047 |
^ keyStringsToLanguageMappings |
2327 | 1048 |
! |
1049 |
||
1050 |
selectListIndex: rowIndex |
|
1051 |
"/ |selection list| |
|
1052 |
"/ list := self objectsList. |
|
1053 |
"/ list isEmpty ifTrue:[^self]. |
|
1054 |
"/ selection := list at:rowIndex ifAbsent:nil. |
|
1055 |
self selectedKeyRow value: rowIndex. |
|
1056 |
||
1057 |
"Created: / 16-06-2007 / 09:06:46 / Administrador" |
|
1058 |
"Modified: / 22-06-2007 / 13:45:54 / Administrador" |
|
1059 |
! |
|
1060 |
||
2434 | 1061 |
selectedKey |
2050 | 1062 |
"Returns the current selected key if there is one row seleted. Otherwise, returns nil" |
1063 |
|rowSelectionIndex | |
|
1064 |
||
2163 | 1065 |
keyStringsToLanguageMappings isNil ifTrue:[^nil]. |
1066 |
self selectedKeyRow value isNil ifTrue:[^nil]. |
|
2050 | 1067 |
rowSelectionIndex := self selectedKeyRow value. |
1068 |
rowSelectionIndex == 0 ifTrue:[^nil]. |
|
1069 |
^ keyStringsToLanguageMappings keyAt:rowSelectionIndex. |
|
2327 | 1070 |
! |
1071 |
||
1072 |
tableView |
|
1073 |
||
1074 |
^dataSetView scrolledView |
|
1075 |
||
1076 |
"Created: / 15-06-2007 / 18:59:51 / Administrador" |
|
2047 | 1077 |
! ! |
1078 |
||
2051 | 1079 |
!InternationalLanguageTranslationEditor methodsFor:'additionalFuncionalities'! |
1080 |
||
1081 |
searchForSimilarTranslation |
|
2163 | 1082 |
"Looks for a quite similar translation for the key and display a dialog with available options" |
2327 | 1083 |
|similarTranslationsAssociations selectedTranslation key| |
2051 | 1084 |
|
2434 | 1085 |
self shouldSearchForSimilarTranslation ifFalse:[^self]. |
2051 | 1086 |
|
2327 | 1087 |
key := self selectedKey. |
1088 |
key isNil ifTrue:[^ self.]. |
|
1089 |
similarTranslationsAssociations := keyStringsToLanguageMappings searchForSimilarTranslation: key in: self currentLanguage. |
|
2434 | 1090 |
similarTranslationsAssociations isEmpty ifTrue:[^self]. |
2051 | 1091 |
|
2163 | 1092 |
similarTranslationsAssociations := similarTranslationsAssociations associations inject: OrderedCollection new into:[:collection :association | |
2434 | 1093 |
collection detect:[:selectedAssociation | |
1094 |
selectedAssociation value sameAs: association value] ifNone:[collection add: association]. |
|
1095 |
collection]. |
|
1096 |
selectedTranslation := Dialog |
|
1097 |
choose:'Choose one if you consider itīs usefull to translate: |
|
1098 |
', |
|
1099 |
'<', key, '> ', (self currentExampleLanguageText ifNil:['']) |
|
1100 |
fromList: (similarTranslationsAssociations collect:[:each | '<', each key, '> ', each value]) |
|
1101 |
values: (similarTranslationsAssociations collect:[:each | each value]) |
|
1102 |
lines:10 |
|
1103 |
cancel: nil. |
|
1104 |
||
1105 |
selectedTranslation notNil ifTrue:[self languageTextHolderValue: selectedTranslation]. |
|
2051 | 1106 |
! ! |
1107 |
||
2015 | 1108 |
!InternationalLanguageTranslationEditor methodsFor:'aspects'! |
1109 |
||
2053 | 1110 |
alwaysWriteUTF8Holder |
2434 | 1111 |
alwaysWriteUTF8Holder isNil ifTrue:[alwaysWriteUTF8Holder := true asValue]. |
2053 | 1112 |
^ alwaysWriteUTF8Holder |
1113 |
! |
|
1114 |
||
2050 | 1115 |
autoAcceptHolder |
2434 | 1116 |
autoAcceptHolder isNil ifTrue:[autoAcceptHolder := true asValue]. |
2050 | 1117 |
^ autoAcceptHolder |
1118 |
! |
|
1119 |
||
1120 |
exampleLanguageSelectionHolder |
|
1121 |
exampleLanguageSelectionHolder isNil ifTrue:[ |
|
2434 | 1122 |
exampleLanguageSelectionHolder := self exampleLanguageByDefault asValue. |
1123 |
exampleLanguageSelectionHolder addDependent:self. |
|
1124 |
]. |
|
2050 | 1125 |
^ exampleLanguageSelectionHolder |
1126 |
! |
|
1127 |
||
1128 |
exampleLanguageTextHolder |
|
1129 |
exampleLanguageTextHolder isNil ifTrue:[ |
|
2434 | 1130 |
exampleLanguageTextHolder := '' asValue. |
2050 | 1131 |
] |