62 |
We also have specific language environments for the following languages: |
We also have specific language environments for the following languages: |
63 |
For Dutch, \"Dutch\". |
For Dutch, \"Dutch\". |
64 |
For German, \"German\". |
For German, \"German\". |
65 |
|
For French, \"French\". |
66 |
|
For Italian, \"Italian\". |
67 |
|
For Slovenian, \"Slovenian\". |
68 |
For Spanish, \"Spanish\". |
For Spanish, \"Spanish\". |
69 |
|
|
70 |
Latin-1 also covers several written languages outside Europe, including |
Latin-1 also covers several written languages outside Europe, including |
253 |
'("European")) |
'("European")) |
254 |
|
|
255 |
(set-language-info-alist |
(set-language-info-alist |
256 |
|
"Dutch" '((tutorial . "TUTORIAL.nl") |
257 |
|
(charset ascii latin-iso8859-1) |
258 |
|
(coding-system iso-latin-1) |
259 |
|
(coding-priority iso-latin-1) |
260 |
|
(nonascii-translation . iso-latin-1) |
261 |
|
(unibyte-syntax . "latin-1") |
262 |
|
(unibyte-display . iso-latin-1) |
263 |
|
(sample-text . "Er is een aantal manieren waarop je dit kan doen") |
264 |
|
(documentation . "\ |
265 |
|
This language environment is almost the same as Latin-1, |
266 |
|
but it selects the Dutch tutorial and input method.")) |
267 |
|
'("European")) |
268 |
|
|
269 |
|
(set-language-info-alist |
270 |
"German" '((tutorial . "TUTORIAL.de") |
"German" '((tutorial . "TUTORIAL.de") |
271 |
(charset ascii latin-iso8859-1) |
(charset ascii latin-iso8859-1) |
272 |
(coding-system iso-latin-1) |
(coding-system iso-latin-1) |
280 |
German (Deutsch S,A|(Bd) Gr,A|_(B Gott") |
German (Deutsch S,A|(Bd) Gr,A|_(B Gott") |
281 |
(documentation . "\ |
(documentation . "\ |
282 |
This language environment is almost the same as Latin-1, |
This language environment is almost the same as Latin-1, |
283 |
but default input method is set to \"german-postfix\".")) |
but default input method is set to \"german-postfix\". |
284 |
|
Additionally, it selects the German tutorial.")) |
285 |
|
'("European")) |
286 |
|
|
287 |
|
(set-language-info-alist |
288 |
|
"French" '((tutorial . "TUTORIAL.fr") |
289 |
|
(charset ascii latin-iso8859-1) |
290 |
|
(coding-system iso-latin-1) |
291 |
|
(coding-priority iso-latin-1) |
292 |
|
(nonascii-translation . latin-iso8859-1) |
293 |
|
(unibyte-syntax . "latin-1") |
294 |
|
(unibyte-display . iso-latin-1) |
295 |
|
(input-method . "latin-1-prefix") |
296 |
|
(sample-text . "French (Fran,Ag(Bais) Bonjour, Salut") |
297 |
|
(documentation . "\ |
298 |
|
This language environment is almost the same as Latin-1, |
299 |
|
but it selects the French tutorial and input method.")) |
300 |
|
'("European")) |
301 |
|
|
302 |
|
(set-language-info-alist |
303 |
|
"Italian" '((tutorial . "TUTORIAL.it") |
304 |
|
(charset ascii latin-iso8859-1) |
305 |
|
(coding-system iso-latin-1) |
306 |
|
(coding-priority iso-latin-1) |
307 |
|
(nonascii-translation . latin-iso8859-1) |
308 |
|
(unibyte-syntax . "latin-1") |
309 |
|
(unibyte-display . iso-latin-1) |
310 |
|
(input-method . "italian-postfix") |
311 |
|
(sample-text . "Salve, ciao!") |
312 |
|
(documentation . "\ |
313 |
|
This language environment is almost the same as Latin-1, |
314 |
|
but sets the default input method to \"italian-postfix\". |
315 |
|
Additionally, it selects the Italian tutorial.")) |
316 |
'("European")) |
'("European")) |
317 |
|
|
318 |
(set-language-info-alist |
(set-language-info-alist |
325 |
(unibyte-display . iso-8859-2) |
(unibyte-display . iso-8859-2) |
326 |
(tutorial . "TUTORIAL.sl") |
(tutorial . "TUTORIAL.sl") |
327 |
(sample-text . ",B.(Belimo vam uspe,B9(Ben dan!") |
(sample-text . ",B.(Belimo vam uspe,B9(Ben dan!") |
328 |
(documentation . t)) |
(documentation . "\ |
329 |
|
This language environment is almost the same as Latin-2, |
330 |
|
but it selects the Slovenian tutorial and input method.")) |
331 |
'("European")) |
'("European")) |
332 |
|
|
333 |
(set-language-info-alist |
(set-language-info-alist |
346 |
and selects the Spanish tutorial.")) |
and selects the Spanish tutorial.")) |
347 |
'("European")) |
'("European")) |
348 |
|
|
|
(set-language-info-alist |
|
|
"Dutch" '((tutorial . "TUTORIAL.nl") |
|
|
(charset ascii latin-iso8859-1) |
|
|
(coding-system iso-latin-1) |
|
|
(coding-priority iso-latin-1) |
|
|
(nonascii-translation . iso-latin-1) |
|
|
(unibyte-syntax . "latin-1") |
|
|
(unibyte-display . iso-latin-1) |
|
|
(sample-text . "Er is een aantal manieren waarop je dit kan doen") |
|
|
(documentation . "\ |
|
|
This language environment is almost the same as Latin-1, |
|
|
but it selects the Dutch tutorial.")) |
|
|
'("European")) |
|
|
|
|
349 |
;; For Turkish, the character set ISO-8859-9 (Latin-5) is used. But, |
;; For Turkish, the character set ISO-8859-9 (Latin-5) is used. But, |
350 |
;; before the introduction of ISO-8859-9 in 1988, ISO-8859-3 (Latin-3) |
;; before the introduction of ISO-8859-9 in 1988, ISO-8859-3 (Latin-3) |
351 |
;; was used for Turkish. Those who use Latin-3 for Turkish should use |
;; was used for Turkish. Those who use Latin-3 for Turkish should use |
531 |
(setq translation-table |
(setq translation-table |
532 |
(make-translation-table-from-vector encoding-vector)) |
(make-translation-table-from-vector encoding-vector)) |
533 |
(define-translation-table 'mac-roman-decoder translation-table) |
(define-translation-table 'mac-roman-decoder translation-table) |
534 |
(define-translation-table 'mac-roman-encoder |
(define-translation-table 'mac-roman-encoder |
535 |
(char-table-extra-slot translation-table 0))) |
(char-table-extra-slot translation-table 0))) |
536 |
|
|
537 |
(define-ccl-program decode-mac-roman |
(define-ccl-program decode-mac-roman |