Mercurial > emacs
annotate lisp/language/georgian.el @ 83949:839526eca1bf
Move here from ../../lispintro/
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Thu, 06 Sep 2007 04:02:15 +0000 |
parents | 9355f9b7bbff |
children | b5d3fc1c4afe f55f9811f5d7 |
rev | line source |
---|---|
47726
33d53d287ee4
Add "no-byte-compile: t" in first line.
Juanma Barranquero <lekktu@gmail.com>
parents:
46673
diff
changeset
|
1 ;;; georgian.el --- language support for Georgian -*- no-byte-compile: t -*- |
42057 | 2 |
75347 | 3 ;; Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007 |
74544 | 4 ;; Free Software Foundation, Inc. |
42057 | 5 |
6 ;; Author: Dave Love <fx@gnu.org> | |
7 ;; Keywords: i18n | |
8 | |
42320 | 9 ;; This file is part of GNU Emacs. |
10 | |
45357 | 11 ;; GNU Emacs is free software; you can redistribute it and/or modify |
42057 | 12 ;; it under the terms of the GNU General Public License as published by |
78236
9355f9b7bbff
Switch license to GPLv3 or later.
Glenn Morris <rgm@gnu.org>
parents:
75347
diff
changeset
|
13 ;; the Free Software Foundation; either version 3, or (at your option) |
42057 | 14 ;; any later version. |
15 | |
45357 | 16 ;; GNU Emacs is distributed in the hope that it will be useful, |
42057 | 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 | |
45357 | 22 ;; along with GNU Emacs; see the file COPYING. If not, write to the |
64085 | 23 ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, |
24 ;; Boston, MA 02110-1301, USA. | |
42057 | 25 |
26 ;;; Commentary: | |
27 | |
28 ;;; Code: | |
29 | |
30 (set-language-info-alist | |
31 "Georgian" `((coding-system georgian-ps) | |
32 (coding-priority georgian-ps) | |
33 (input-method . "georgian") | |
34 (features code-pages) | |
49044
3a1b596813f9
("Georgian"): Fix nonascii-translation.
Dave Love <fx@gnu.org>
parents:
47726
diff
changeset
|
35 (nonascii-translation . ,(get 'decode-georgian-ps |
3a1b596813f9
("Georgian"): Fix nonascii-translation.
Dave Love <fx@gnu.org>
parents:
47726
diff
changeset
|
36 'translation-table)) |
42057 | 37 (documentation . "Support for georgian-ps character set.")) |
38 '("European")) ; fixme: is this appropriate for | |
39 ; a non-Latin script? | |
40 | |
41 (provide 'georgian) | |
42 | |
52401 | 43 ;;; arch-tag: 15499fbb-26d4-4a13-9d78-135eef7d32f5 |
42057 | 44 ;;; georgian.el ends here |