diff options
| author | Kenichi Handa | 1997-07-02 12:58:31 +0000 |
|---|---|---|
| committer | Kenichi Handa | 1997-07-02 12:58:31 +0000 |
| commit | 3c606ef462459f22abcaddf302b66f9e2ce1b977 (patch) | |
| tree | bb3c8a96904c78a838a9df7a73f31094cf40c9fc | |
| parent | 5dd921df7521f1f674daf0c961e7834c0ecdf4b3 (diff) | |
| download | emacs-3c606ef462459f22abcaddf302b66f9e2ce1b977.tar.gz emacs-3c606ef462459f22abcaddf302b66f9e2ce1b977.zip | |
Call set-language-info-alist for IPA.
(setup-ipa-environment): New function.
| -rw-r--r-- | lisp/language/misc-lang.el | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/lisp/language/misc-lang.el b/lisp/language/misc-lang.el index 1768fec8a31..0e9526a0420 100644 --- a/lisp/language/misc-lang.el +++ b/lisp/language/misc-lang.el | |||
| @@ -26,4 +26,17 @@ | |||
| 26 | ;;; IPA (International Phonetic Alphabet) | 26 | ;;; IPA (International Phonetic Alphabet) |
| 27 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | 27 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 28 | 28 | ||
| 29 | (defun setup-ipa-environment () | ||
| 30 | "Setup multilingual environment (MULE) for IPA." | ||
| 31 | (interactive) | ||
| 32 | (setup-english-environment)) | ||
| 33 | |||
| 34 | (set-language-info-alist | ||
| 35 | "IPA" '((setup-function . setup-ipa-environment) | ||
| 36 | (charset . (ipa)) | ||
| 37 | (documentation . "\ | ||
| 38 | IPA is International Phonetic Alphabet for English, French, German | ||
| 39 | and Italian."))) | ||
| 40 | |||
| 29 | ;;; misc-lang.el ends here | 41 | ;;; misc-lang.el ends here |
| 42 | |||