Mercurial > emacs
comparison lisp/language/european.el @ 88806:7618cfcfaeea
("German", "French", "Spanish"): Add
latin-9 as alternative coding system.
("Slovenian", "Polish"): Add windows-1250 as alternative coding
system.
("Dutch"): Add latin-9 as alternative coding system. Add input
method.
("Turkish"): Add windows-1254 and latin-3 as alternative coding
systems.
("Lithuanian", "Latvian"): Add windows-1257 as alternative coding
system.
author | Dave Love <fx@gnu.org> |
---|---|
date | Thu, 27 Jun 2002 21:54:39 +0000 |
parents | 93cfa81ccf00 |
children | 7d361fc41696 |
comparison
equal
deleted
inserted
replaced
88805:7956f7e0336b | 88806:7618cfcfaeea |
---|---|
389 (define-coding-system-alias 'ibm437 'cp437) | 389 (define-coding-system-alias 'ibm437 'cp437) |
390 | 390 |
391 (set-language-info-alist | 391 (set-language-info-alist |
392 "German" '((tutorial . "TUTORIAL.de") | 392 "German" '((tutorial . "TUTORIAL.de") |
393 (charset iso-8859-1) | 393 (charset iso-8859-1) |
394 (coding-system iso-latin-1) | 394 (coding-system iso-latin-1 iso-latin-9) |
395 (coding-priority iso-latin-1) | 395 (coding-priority iso-latin-1) |
396 (nonascii-translation . iso-8859-1) | 396 (nonascii-translation . iso-8859-1) |
397 (input-method . "german-postfix") | 397 (input-method . "german-postfix") |
398 (unibyte-syntax . "latin-1") | 398 (unibyte-syntax . "latin-1") |
399 (unibyte-display . iso-latin-1) | 399 (unibyte-display . iso-latin-1) |
407 '("European")) | 407 '("European")) |
408 | 408 |
409 (set-language-info-alist | 409 (set-language-info-alist |
410 "French" '((tutorial . "TUTORIAL.fr") | 410 "French" '((tutorial . "TUTORIAL.fr") |
411 (charset iso-8859-1) | 411 (charset iso-8859-1) |
412 (coding-system iso-latin-1) | 412 (coding-system iso-latin-1 iso-latin-9) |
413 (coding-priority iso-latin-1) | 413 (coding-priority iso-latin-1) |
414 (nonascii-translation . iso-8859-1) | 414 (nonascii-translation . iso-8859-1) |
415 (unibyte-syntax . "latin-1") | 415 (unibyte-syntax . "latin-1") |
416 (unibyte-display . iso-latin-1) | 416 (unibyte-display . iso-latin-1) |
417 (input-method . "latin-1-prefix") | 417 (input-method . "latin-1-prefix") |
421 but it selects the French tutorial.")) | 421 but it selects the French tutorial.")) |
422 '("European")) | 422 '("European")) |
423 | 423 |
424 (set-language-info-alist | 424 (set-language-info-alist |
425 "Slovenian" '((charset iso-8859-2) | 425 "Slovenian" '((charset iso-8859-2) |
426 (coding-system . (iso-8859-2)) | 426 (coding-system . (iso-8859-2 windows-1250)) |
427 (coding-priority . (iso-8859-2)) | 427 (coding-priority . (iso-8859-2)) |
428 (nonascii-translation . iso-8859-2) | 428 (nonascii-translation . iso-8859-2) |
429 (input-method . "latin-2-postfix") | 429 (input-method . "latin-2-postfix") |
430 (unibyte-syntax . "latin-2") | 430 (unibyte-syntax . "latin-2") |
431 (unibyte-display . iso-8859-2) | 431 (unibyte-display . iso-8859-2) |
435 '("European")) | 435 '("European")) |
436 | 436 |
437 (set-language-info-alist | 437 (set-language-info-alist |
438 "Spanish" '((tutorial . "TUTORIAL.es") | 438 "Spanish" '((tutorial . "TUTORIAL.es") |
439 (charset iso-8859-1) | 439 (charset iso-8859-1) |
440 (coding-system iso-latin-1) | 440 (coding-system iso-latin-1 iso-latin-9) |
441 (coding-priority iso-latin-1) | 441 (coding-priority iso-latin-1) |
442 (nonascii-translation . iso-8859-1) | 442 (nonascii-translation . iso-8859-1) |
443 (input-method . "spanish-postfix") | 443 (input-method . "spanish-postfix") |
444 (unibyte-syntax . "latin-1") | 444 (unibyte-syntax . "latin-1") |
445 (unibyte-display . iso-latin-1) | 445 (unibyte-display . iso-latin-1) |
451 '("European")) | 451 '("European")) |
452 | 452 |
453 (set-language-info-alist | 453 (set-language-info-alist |
454 "Dutch" '((tutorial . "TUTORIAL.nl") | 454 "Dutch" '((tutorial . "TUTORIAL.nl") |
455 (charset iso-8859-1) | 455 (charset iso-8859-1) |
456 (coding-system iso-latin-1) | 456 (coding-system iso-latin-1 iso-latin-9) |
457 (coding-priority iso-latin-1) | 457 (coding-priority iso-latin-1) |
458 (nonascii-translation . iso-8859-1) | 458 (nonascii-translation . iso-8859-1) |
459 (unibyte-syntax . "latin-1") | 459 (unibyte-syntax . "latin-1") |
460 (unibyte-display . iso-latin-1) | 460 (unibyte-display . iso-latin-1) |
461 (input-method . "dutch") | |
461 (sample-text . "Er is een aantal manieren waarop je dit kan doen") | 462 (sample-text . "Er is een aantal manieren waarop je dit kan doen") |
462 (documentation . "\ | 463 (documentation . "\ |
463 This language environment is almost the same as Latin-1, | 464 This language environment is almost the same as Latin-1, |
464 but it selects the Dutch tutorial.")) | 465 but it selects the Dutch tutorial and input method.")) |
465 '("European")) | 466 '("European")) |
466 | 467 |
467 ;; For Turkish, the character set ISO-8859-9 (Latin-5) is used. But, | 468 ;; For Turkish, the character set ISO-8859-9 (Latin-5) is used. But, |
468 ;; before the introduction of ISO-8859-9 in 1988, ISO-8859-3 (Latin-3) | 469 ;; before the introduction of ISO-8859-9 in 1988, ISO-8859-3 (Latin-3) |
469 ;; was used for Turkish. Those who use Latin-3 for Turkish should use | 470 ;; was used for Turkish. Those who use Latin-3 for Turkish should use |
470 ;; "Latin-3" language environment. | 471 ;; "Latin-3" language environment. |
471 | 472 |
472 (set-language-info-alist | 473 (set-language-info-alist |
473 "Turkish" '((charset iso-8859-9) | 474 "Turkish" '((charset iso-8859-9) |
474 (coding-system iso-latin-5) | 475 (coding-system iso-latin-5 windows-1254 iso-latin-3) |
475 (coding-priority iso-latin-5) | 476 (coding-priority iso-latin-5) |
476 (nonascii-translation . iso-8859-9) | 477 (nonascii-translation . iso-8859-9) |
477 (unibyte-syntax . "latin-5") | 478 (unibyte-syntax . "latin-5") |
478 (unibyte-display . iso-latin-5) | 479 (unibyte-display . iso-latin-5) |
479 (input-method . "turkish-postfix") | 480 (input-method . "turkish-postfix") |
484 ;; Maintainer: Wlodek Bzyl <matwb@univ.gda.pl> | 485 ;; Maintainer: Wlodek Bzyl <matwb@univ.gda.pl> |
485 ;; Keywords: multilingual, Polish | 486 ;; Keywords: multilingual, Polish |
486 | 487 |
487 (set-language-info-alist | 488 (set-language-info-alist |
488 "Polish" '((charset . (iso-8859-2)) | 489 "Polish" '((charset . (iso-8859-2)) |
489 (coding-system . (iso-8859-2)) | 490 (coding-system . (iso-8859-2 windows-1250)) |
490 (coding-priority . (iso-8859-2)) | 491 (coding-priority . (iso-8859-2)) |
491 (nonascii-translation . iso-8859-2) | 492 (nonascii-translation . iso-8859-2) |
492 (input-method . "polish-slash") | 493 (input-method . "polish-slash") |
493 (unibyte-syntax . "latin-2") | 494 (unibyte-syntax . "latin-2") |
494 (unibyte-display . iso-8859-2) | 495 (unibyte-display . iso-8859-2) |
512 ;; Fixme: input-method | 513 ;; Fixme: input-method |
513 (documentation . "Support for Latin-7, e.g. Latvian, Lithuanian.")) | 514 (documentation . "Support for Latin-7, e.g. Latvian, Lithuanian.")) |
514 '("European")) | 515 '("European")) |
515 | 516 |
516 (set-language-info-alist | 517 (set-language-info-alist |
517 "Lithuanian" `((coding-system latin-7) | 518 "Lithuanian" `((coding-system latin-7 windows-1257) |
518 (coding-priority latin-7) | 519 (coding-priority latin-7) |
519 (nonascii-translation . iso-8859-13) | 520 (nonascii-translation . iso-8859-13) |
520 (input-method . "lithuanian-keyboard") | 521 (input-method . "lithuanian-keyboard") |
521 (documentation . "Support for Lithuanian.")) | 522 (documentation . "Support for Lithuanian.")) |
522 '("European")) | 523 '("European")) |
523 | 524 |
524 (set-language-info-alist | 525 (set-language-info-alist |
525 "Latvian" `((coding-system latin-7) | 526 "Latvian" `((coding-system latin-7 windows-1257) |
526 (coding-priority latin-7) | 527 (coding-priority latin-7) |
527 (nonascii-translation . iso-8859-13) | 528 (nonascii-translation . iso-8859-13) |
528 (input-method . "latvian-keyboard") | 529 (input-method . "latvian-keyboard") |
529 (documentation . "Support for Latvian.")) | 530 (documentation . "Support for Latvian.")) |
530 '("European")) | 531 '("European")) |