From cb13b8f3baf6bea0e3978f4e24c849dea20da326 Mon Sep 17 00:00:00 2001 From: tomo Date: Tue, 29 Jun 1999 16:02:22 +0000 Subject: [PATCH] (setup-ipa-environment): Just call `set-language-environment'. - Specify `coding-priority' and `input-method' properties of each language environment. --- lisp/mule/misc-lang.el | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/lisp/mule/misc-lang.el b/lisp/mule/misc-lang.el index 236f9b0..b0f9ff3 100644 --- a/lisp/mule/misc-lang.el +++ b/lisp/mule/misc-lang.el @@ -1,6 +1,6 @@ ;;; misc-lang.el --- support for miscellaneous languages (characters) -;; Copyright (C) 1995 Electrotechnical Laboratory, JAPAN. +;; Copyright (C) 1995,1999 Electrotechnical Laboratory, JAPAN. ;; Licensed to the Free Software Foundation. ;; Copyright (C) 1997 MORIOKA Tomohiko @@ -40,11 +40,13 @@ (defun setup-ipa-environment () "Setup multilingual environment (MULE) for IPA." (interactive) - (setup-english-environment)) + (set-language-environment "IPA")) (set-language-info-alist - "IPA" '((setup-function . setup-ipa-environment) - (charset . (ipa)) + "IPA" '((charset . (ipa)) + (coding-priority iso-2022-7bit) + (coding-system iso-2022-7bit) + (input-method . "ipa") (documentation . "\ IPA is International Phonetic Alphabet for English, French, German and Italian."))) -- 1.7.10.4