diff options
| -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 | |||