annotate leim/quail/py-punct.el @ 62675:114ecd5ee47b

Add more pointers to ports of Unix tools to Windows, and to the Emacs Wiki (which contains building instructions for Windows). Reword image library instructions and remove obsolete incompatibility information.
author Juanma Barranquero <lekktu@gmail.com>
date Tue, 24 May 2005 10:40:51 +0000
parents 695cf19ef79e
children 23a17af379b1 375f2633d815
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
40710
890f548046c1 Add coding tag.
Dave Love <fx@gnu.org>
parents: 38701
diff changeset
1 ;;; py-punct.el --- Quail packages for Chinese (pinyin + extra symbols) -*-coding: iso-2022-7bit;-*-
18803
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
2
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
3 ;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
4 ;; Licensed to the Free Software Foundation.
38701
fc81ac1c9e64 ("chinese-py-punct"): Copy the QUAIL-MAP of
Gerd Moellmann <gerd@gnu.org>
parents: 38453
diff changeset
5 ;; Copyright (C) 2001 Free Software Foundation, Inc.
18803
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
6
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
7 ;; Author: Ken'ichi HANDA <handa@etl.go.jp>
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
8
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
9 ;; Keywords: multilingual, input method, Chienese
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
10
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
11 ;; This file is part of GNU Emacs.
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
12
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
13 ;; GNU Emacs is free software; you can redistribute it and/or modify
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
14 ;; it under the terms of the GNU General Public License as published by
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
15 ;; the Free Software Foundation; either version 2, or (at your option)
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
16 ;; any later version.
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
17
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
18 ;; GNU Emacs is distributed in the hope that it will be useful,
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
19 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
20 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
21 ;; GNU General Public License for more details.
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
22
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
23 ;; You should have received a copy of the GNU General Public License
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
24 ;; along with GNU Emacs; see the file COPYING. If not, write to the
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
25 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
26 ;; Boston, MA 02111-1307, USA.
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
27
38453
519983161a46 Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents: 31429
diff changeset
28 ;;; Commentary:
519983161a46 Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents: 31429
diff changeset
29
519983161a46 Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents: 31429
diff changeset
30 ;;; Code:
519983161a46 Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents: 31429
diff changeset
31
18966
a5a44ea689a5 Require 'quail.
Kenichi Handa <handa@m17n.org>
parents: 18803
diff changeset
32 (require 'quail)
a5a44ea689a5 Require 'quail.
Kenichi Handa <handa@m17n.org>
parents: 18803
diff changeset
33
18803
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
34 (load "quail/PY")
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
35 (load "quail/Punct")
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
36
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
37 (quail-define-package
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
38 "chinese-py-punct" "Chinese-GB" "$AF47{(B"
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
39 t
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
40 "$A::WVJdHk(B $AF4Rt7=08(B and `v' for $A1j5c7{:EJdHk(B
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
41
31429
f5fac9bb3bd0 ("chinese-py-punct"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents: 18966
diff changeset
42 This is the combination of the input methods `chinese-py' and `chinese-punct'.
f5fac9bb3bd0 ("chinese-py-punct"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents: 18966
diff changeset
43 You can enter normal Chinese characters by the same way as `chinese-py'.
18803
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
44 And, you can enter symbols by typing `v' followed by any key sequences
31429
f5fac9bb3bd0 ("chinese-py-punct"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents: 18966
diff changeset
45 defined in `chinese-punct'.
18803
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
46
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
47 For instance, typing `v' and `%' insert `$A#%(B'.
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
48 ")
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
49
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
50 (setcar (nthcdr 2 quail-current-package)
38701
fc81ac1c9e64 ("chinese-py-punct"): Copy the QUAIL-MAP of
Gerd Moellmann <gerd@gnu.org>
parents: 38453
diff changeset
51 (copy-sequence (nth 2 (assoc "chinese-py" quail-package-alist))))
18803
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
52
17948244754e Initial revision
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
53 (quail-defrule "v" (nth 2 (assoc "chinese-punct" quail-package-alist)))
31429
f5fac9bb3bd0 ("chinese-py-punct"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents: 18966
diff changeset
54
f5fac9bb3bd0 ("chinese-py-punct"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents: 18966
diff changeset
55 (load "quail/TONEPY")
f5fac9bb3bd0 ("chinese-py-punct"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents: 18966
diff changeset
56
f5fac9bb3bd0 ("chinese-py-punct"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents: 18966
diff changeset
57 (quail-define-package
f5fac9bb3bd0 ("chinese-py-punct"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents: 18966
diff changeset
58 "chinese-tonepy-punct" "Chinese-GB" "$AF47{(B"
f5fac9bb3bd0 ("chinese-py-punct"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents: 18966
diff changeset
59 t
f5fac9bb3bd0 ("chinese-py-punct"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents: 18966
diff changeset
60 "$A::WVJdHk(B $A4x5wF4Rt7=08(B and `v' for $A1j5c7{:EJdHk(B
f5fac9bb3bd0 ("chinese-py-punct"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents: 18966
diff changeset
61
f5fac9bb3bd0 ("chinese-py-punct"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents: 18966
diff changeset
62 This is the combination of the input methods `chinese-tonepy' and
f5fac9bb3bd0 ("chinese-py-punct"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents: 18966
diff changeset
63 `chinese-punct'.
f5fac9bb3bd0 ("chinese-py-punct"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents: 18966
diff changeset
64
f5fac9bb3bd0 ("chinese-py-punct"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents: 18966
diff changeset
65 You can enter normal Chinese characters by the same way as
f5fac9bb3bd0 ("chinese-py-punct"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents: 18966
diff changeset
66 `chinese-tonepy'. And, you can enter symbols by typing `v' followed
f5fac9bb3bd0 ("chinese-py-punct"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents: 18966
diff changeset
67 by any key sequences defined in `chinese-punct'.
f5fac9bb3bd0 ("chinese-py-punct"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents: 18966
diff changeset
68
f5fac9bb3bd0 ("chinese-py-punct"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents: 18966
diff changeset
69 For instance, typing `v' and `%' insert `$A#%(B'.
f5fac9bb3bd0 ("chinese-py-punct"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents: 18966
diff changeset
70 ")
f5fac9bb3bd0 ("chinese-py-punct"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents: 18966
diff changeset
71
38701
fc81ac1c9e64 ("chinese-py-punct"): Copy the QUAIL-MAP of
Gerd Moellmann <gerd@gnu.org>
parents: 38453
diff changeset
72 (setcar (nthcdr 2 quail-current-package)
fc81ac1c9e64 ("chinese-py-punct"): Copy the QUAIL-MAP of
Gerd Moellmann <gerd@gnu.org>
parents: 38453
diff changeset
73 (copy-sequence (nth 2 (assoc "chinese-tonepy" quail-package-alist))))
fc81ac1c9e64 ("chinese-py-punct"): Copy the QUAIL-MAP of
Gerd Moellmann <gerd@gnu.org>
parents: 38453
diff changeset
74
fc81ac1c9e64 ("chinese-py-punct"): Copy the QUAIL-MAP of
Gerd Moellmann <gerd@gnu.org>
parents: 38453
diff changeset
75 (quail-defrule "v" (nth 2 (assoc "chinese-punct" quail-package-alist)))
38453
519983161a46 Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents: 31429
diff changeset
76
52401
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 40710
diff changeset
77 ;;; arch-tag: 941fd2ac-2d26-4b0e-8458-b5e485c5aa7d
38453
519983161a46 Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents: 31429
diff changeset
78 ;;; py-punct.el ends here