From 3c606ef462459f22abcaddf302b66f9e2ce1b977 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Wed, 2 Jul 1997 12:58:31 +0000 Subject: Call set-language-info-alist for IPA. (setup-ipa-environment): New function. --- lisp/language/misc-lang.el | 13 +++++++++++++ 1 file changed, 13 insertions(+) (limited to 'lisp/language/misc-lang.el') diff --git a/lisp/language/misc-lang.el b/lisp/language/misc-lang.el index 1768fec8a3..0e9526a042 100644 --- a/lisp/language/misc-lang.el +++ b/lisp/language/misc-lang.el @@ -26,4 +26,17 @@ ;;; IPA (International Phonetic Alphabet) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +(defun setup-ipa-environment () + "Setup multilingual environment (MULE) for IPA." + (interactive) + (setup-english-environment)) + +(set-language-info-alist + "IPA" '((setup-function . setup-ipa-environment) + (charset . (ipa)) + (documentation . "\ +IPA is International Phonetic Alphabet for English, French, German +and Italian."))) + ;;; misc-lang.el ends here + -- cgit v1.2.3