(Frename_file): Undo last change: no need to ifdef away
[bpt/emacs.git] / lisp / language / misc-lang.el
1 ;;; misc-lang.el --- support for miscellaneous languages (characters) -*- no-byte-compile: t -*-
2
3 ;; Copyright (C) 1995, 1997
4 ;; National Institute of Advanced Industrial Science and Technology (AIST)
5 ;; Registration Number H14PRO021
6
7 ;; Keywords: multilingual, character set, coding system
8
9 ;; This file is part of GNU Emacs.
10
11 ;; GNU Emacs is free software; you can redistribute it and/or modify
12 ;; it under the terms of the GNU General Public License as published by
13 ;; the Free Software Foundation; either version 2, or (at your option)
14 ;; any later version.
15
16 ;; GNU Emacs is distributed in the hope that it will be useful,
17 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
18 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19 ;; GNU General Public License for more details.
20
21 ;; You should have received a copy of the GNU General Public License
22 ;; along with GNU Emacs; see the file COPYING. If not, write to the
23 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
24 ;; Boston, MA 02111-1307, USA.
25
26 ;;; Commentary:
27
28 ;;; Code:
29
30 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
31 ;;; IPA (International Phonetic Alphabet)
32 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
33
34 (set-language-info-alist
35 "IPA" '((charset . (ipa))
36 (coding-priority iso-2022-7bit)
37 (coding-system iso-2022-7bit)
38 (input-method . "ipa")
39 (nonascii-translation . ipa)
40 (unibyte-display . iso-2022-7bit)
41 (documentation . "\
42 IPA is International Phonetic Alphabet for English, French, German
43 and Italian.")))
44
45 (provide 'misc-lang)
46
47 ;;; arch-tag: 6953585c-1a1a-4c09-be82-a2518afb6074
48 ;;; misc-lang.el ends here