(Vmac_ts_active_input_buf) [USE_MAC_TSM]: New variable.
[emacs.git] / lisp / language / georgian.el
blob0b61bae504ad59b47ee1ca22e966b50b9afbd090
1 ;;; georgian.el --- language support for Georgian -*- no-byte-compile: t -*-
3 ;; Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008
4 ;; Free Software Foundation, Inc.
6 ;; Author: Dave Love <fx@gnu.org>
7 ;; Keywords: i18n
9 ;; This file is part of GNU Emacs.
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 3, or (at your option)
14 ;; any later version.
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.
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., 51 Franklin Street, Fifth Floor,
24 ;; Boston, MA 02110-1301, USA.
26 ;;; Commentary:
28 ;;; Code:
30 (set-language-info-alist
31 "Georgian" `((coding-system georgian-ps)
32 (coding-priority georgian-ps)
33 (input-method . "georgian")
34 (features code-pages)
35 (nonascii-translation . ,(get 'decode-georgian-ps
36 'translation-table))
37 (documentation . "Support for georgian-ps character set."))
38 '("European")) ; fixme: is this appropriate for
39 ; a non-Latin script?
41 (provide 'georgian)
43 ;;; arch-tag: 15499fbb-26d4-4a13-9d78-135eef7d32f5
44 ;;; georgian.el ends here