summaryrefslogtreecommitdiff
path: root/leim/quail
diff options
context:
space:
mode:
authorPavel Janík <Pavel@Janik.cz>2001-07-16 20:22:24 +0000
committerPavel Janík <Pavel@Janik.cz>2001-07-16 20:22:24 +0000
commitbe567141bcb5e39ca67cdb120b0bad899704eacc (patch)
treeb49776d8e5e7a7d401e8e3c89c2acabfca461737 /leim/quail
parent358a9f5055cb4dec6d22d4f12a3f93da2288fc53 (diff)
Some fixes to follow lisp coding conventions and typo fixes.
Diffstat (limited to 'leim/quail')
-rw-r--r--leim/quail/cyril-jis.el4
-rw-r--r--leim/quail/cyrillic.el10
-rw-r--r--leim/quail/czech.el6
-rw-r--r--leim/quail/devanagari.el4
-rw-r--r--leim/quail/ethiopic.el6
-rw-r--r--leim/quail/greek.el6
-rw-r--r--leim/quail/hangul.el6
-rw-r--r--leim/quail/hangul3.el6
-rw-r--r--leim/quail/hanja-jis.el6
-rw-r--r--leim/quail/hanja.el6
-rw-r--r--leim/quail/hanja3.el6
-rw-r--r--leim/quail/hebrew.el11
-rw-r--r--leim/quail/ipa.el6
-rw-r--r--leim/quail/japanese.el5
-rw-r--r--leim/quail/lao.el6
-rw-r--r--leim/quail/latin-alt.el8
-rw-r--r--leim/quail/latin-ltx.el6
-rw-r--r--leim/quail/latin-post.el8
-rw-r--r--leim/quail/latin-pre.el10
-rw-r--r--leim/quail/lrt.el6
-rw-r--r--leim/quail/py-punct.el8
-rw-r--r--leim/quail/pypunct-b5.el8
-rw-r--r--leim/quail/slovak.el11
-rw-r--r--leim/quail/symbol-ksc.el5
-rw-r--r--leim/quail/thai.el6
-rw-r--r--leim/quail/tibetan.el6
-rw-r--r--leim/quail/viqr.el6
27 files changed, 137 insertions, 45 deletions
diff --git a/leim/quail/cyril-jis.el b/leim/quail/cyril-jis.el
index c17c9c76fb..5196b4c63c 100644
--- a/leim/quail/cyril-jis.el
+++ b/leim/quail/cyril-jis.el
@@ -1,4 +1,4 @@
-;;; quail/cyril-jis.el -- Quail package for inputting JISX0208 Cyrillic letters
+;;; cyril-jis.el --- Quail package for inputting JISX0208 Cyrillic letters
;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
@@ -140,3 +140,5 @@
;; Local Variables:
;; buffer-file-coding-system: iso-2022-7bit
;; End:
+
+;;; cyril-jis.el ends here
diff --git a/leim/quail/cyrillic.el b/leim/quail/cyrillic.el
index 1cd7f08eaf..efe713f00f 100644
--- a/leim/quail/cyrillic.el
+++ b/leim/quail/cyrillic.el
@@ -1,4 +1,4 @@
-;;; quail/cyrillic.el -- Quail package for inputting Cyrillic characters
+;;; cyrillic.el --- Quail package for inputting Cyrillic characters
;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
@@ -22,6 +22,8 @@
;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
;; Boston, MA 02111-1307, USA.
+;;; Commentary:
+
;;; Code:
(require 'quail)
@@ -838,10 +840,8 @@ The only difference with cyrillic-translit is that \"sht\" translates as
("/I" ?,L&(B) ("/J" ?,L((B) ("/L" ?,L)(B) ("/N" ?,L*(B) ("/Z" ?,L/(B)
)
-
-
-
-
;; Local Variables:
;; buffer-file-coding-system: iso-2022-7bit
;; End:
+
+;;; cyrillic.el ends here
diff --git a/leim/quail/czech.el b/leim/quail/czech.el
index 666a9c0cf8..15fd8774b7 100644
--- a/leim/quail/czech.el
+++ b/leim/quail/czech.el
@@ -1,9 +1,9 @@
-;;; quail/czech.el -- Quail package for inputting Czech
+;;; czech.el --- Quail package for inputting Czech
;; Copyright (C) 1998, 2001 Free Software Foundation.
;; Author: Milan Zamazal <pdm@zamazal.org>
-;; Maintainer: Pavel Jan,Al(Bk <Pavel@Janik.cz>
+;; Maintainer: Pavel Jan,Bm(Bk <Pavel@Janik.cz>
;; Keywords: multilingual, input method, Czech
;; This file is part of GNU Emacs.
@@ -566,3 +566,5 @@ All other keys are the same as on standard US keyboard."
([kp-9] ?9)
([kp-0] ?0)
([kp-add] ?+))
+
+;;; czech.el ends here
diff --git a/leim/quail/devanagari.el b/leim/quail/devanagari.el
index 9d840b91bf..8f4ac00e3d 100644
--- a/leim/quail/devanagari.el
+++ b/leim/quail/devanagari.el
@@ -1,4 +1,4 @@
-;; quail/devanagari.el -- Quail packages for inputting Devanagari
+;;; devanagari.el --- Quail packages for inputting Devanagari
;; Copyright (C) 1997 Free Software Foundation, Inc.
@@ -667,3 +667,5 @@ Specials : Anuswar M $(5!"(B Visarg H $(5!#(B
)
(devanagari-hindi-transliteration-quail-define-rules)
+
+;;; devanagari.el ends here
diff --git a/leim/quail/ethiopic.el b/leim/quail/ethiopic.el
index 3b01061555..929570446d 100644
--- a/leim/quail/ethiopic.el
+++ b/leim/quail/ethiopic.el
@@ -1,4 +1,4 @@
-;; quail/ethiopic.el --- Quail package for inputting Ethiopic characters
+;;; ethiopic.el --- Quail package for inputting Ethiopic characters
;; Copyright (C) 1997, 1998 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
@@ -24,6 +24,8 @@
;; Author: TAKAHASHI Naoto <ntakahas@etl.go.jp>
+;;; Commentary:
+
;;; Code:
(require 'quail)
@@ -1144,4 +1146,4 @@ C-' or `M-x ethio-gemination'
(if (ethio-prefer-amharic-p) ?$(3"c(B ?$(3"f(B)
"ethiopic"))
-;;; quail/ethiopic.el ends here
+;;; ethiopic.el ends here
diff --git a/leim/quail/greek.el b/leim/quail/greek.el
index aa81565076..ea20b83dab 100644
--- a/leim/quail/greek.el
+++ b/leim/quail/greek.el
@@ -1,4 +1,4 @@
-;;; quail/greek.el -- Quail package for inputting Greek
+;;; greek.el --- Quail package for inputting Greek
;; Copyright (C) 1997, 2001 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
@@ -22,6 +22,8 @@
;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
;; Boston, MA 02111-1307, USA.
+;;; Commentary:
+
;;; Code:
(require 'quail)
@@ -904,3 +906,5 @@ e.g.
("Y:" ?,F[(B)
("i:;" ?,F@(B)
("y:;" ?,F`(B))
+
+;;; greek.el ends here
diff --git a/leim/quail/hangul.el b/leim/quail/hangul.el
index 08447ba44c..044d12b993 100644
--- a/leim/quail/hangul.el
+++ b/leim/quail/hangul.el
@@ -1,4 +1,4 @@
-;;; quail/hangul.el -- Quail package for inputting Korean Hangul characters
+;;; hangul.el --- Quail package for inputting Korean Hangul characters
;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
@@ -22,6 +22,8 @@
;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
;; Boston, MA 02111-1307, USA.
+;;; Commentary:
+
;;; Code:
(require 'quail)
@@ -2605,3 +2607,5 @@ For instance, typing \"S\" followed by TAB will tell you
("SA" ?$(C!J(B)
("SC/" ?$(C!K(B)
("SF" ?$(C"5(B))
+
+;;; hangul.el ends here
diff --git a/leim/quail/hangul3.el b/leim/quail/hangul3.el
index 57fcc0b4d0..974c7557de 100644
--- a/leim/quail/hangul3.el
+++ b/leim/quail/hangul3.el
@@ -1,4 +1,4 @@
-;;; quail/hangul3.el -- Quail package for inputting Korean Hangul characters
+;;; hangul3.el --- Quail package for inputting Korean Hangul characters
;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
@@ -22,6 +22,8 @@
;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
;; Boston, MA 02111-1307, USA.
+;;; Commentary:
+
;;; Code:
(require 'quail)
@@ -2884,3 +2886,5 @@
("md3" ?$(CH|(B)
("mdq" ?$(CH}(B)
("mda" ?$(CH~(B))
+
+;;; hangul3.el ends here
diff --git a/leim/quail/hanja-jis.el b/leim/quail/hanja-jis.el
index 1814d2e92a..865981684d 100644
--- a/leim/quail/hanja-jis.el
+++ b/leim/quail/hanja-jis.el
@@ -1,4 +1,4 @@
-;;; quail/hanja-jis.el -- Quail package for inputting Korean Hanja (JISX0208)
+;;; hanja-jis.el --- Quail package for inputting Korean Hanja (JISX0208)
;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
@@ -22,6 +22,8 @@
;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
;; Boston, MA 02111-1307, USA.
+;;; Commentary:
+
;;; Code:
(require 'quail)
@@ -521,3 +523,5 @@
("gml" "$B4n4r4u5)5:5>I1Q%RzS)S`XAXZY&Zk[']8_f_g_t`!`:c6f<nZrF(B")
("glf" "$B5Merk#pvs\(B")
("unknown" "$B4#<5DNFJFdFuJ=KsL]QeRIRpS&S9SuS{T*T+T8T:T>TBTCTKTNTQTWT\T_UNU~V&V,V-V.V/V0V2V4V8VNW;WjWnWpY0YKY^Z1Zs[=[b[n\)\-\.\/\0\1\O\S\j\n\o\p\q\x]&]6]B]i^<^L^c_&_1`<a:a<a>b<bBbXbmbpbsc%c5cNcdc}d&d1d=dIdLdYdddfdhdte9eaebemenevf$g3g\h4h6hHhMhWhhiFi[ibj,jQj^jmk\lCmZmhmimzn%n}o'oZo]p#p-pXp]p`q;qIqRr;r@rGrOrZr_rer~s#s%(B"))
+
+;;; hanja-jis.el ends here
diff --git a/leim/quail/hanja.el b/leim/quail/hanja.el
index 9cad9fcbef..861cd22f5f 100644
--- a/leim/quail/hanja.el
+++ b/leim/quail/hanja.el
@@ -1,4 +1,4 @@
-;;; quail/hanja.el --- Quail-package for Korean Hanja (KSC5601)
+;;; hanja.el --- Quail-package for Korean Hanja (KSC5601)
;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
@@ -22,6 +22,8 @@
;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
;; Boston, MA 02111-1307, USA.
+;;; Commentary:
+
;;; Code:
(require 'quail)
@@ -507,3 +509,5 @@
("gmd" "$(C}i(B")
("gml" "$(C}j}k}l}m}n}o}p}q}r}s}t}u}v}w}x}y}z}{}|}}(B")
("glf" "$(C}~(B"))
+
+;;; hanja.el ends here
diff --git a/leim/quail/hanja3.el b/leim/quail/hanja3.el
index 1276106c30..b24c612eb8 100644
--- a/leim/quail/hanja3.el
+++ b/leim/quail/hanja3.el
@@ -1,4 +1,4 @@
-;;; quail/hanja3.el --- Quail-package for Korean Hanja (KSC5601)
+;;; hanja3.el --- Quail-package for Korean Hanja (KSC5601)
;; Copyright (C) 1997 Free Software Foundation, Inc.
@@ -22,6 +22,8 @@
;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
;; Boston, MA 02111-1307, USA.
+;;; Commentary:
+
;;; Code:
(require 'quail)
@@ -505,3 +507,5 @@
("mga" "$(C}i(B")
("m8" "$(C}j}k}l}m}n}o}p}q}r}s}t}u}v}w}x}y}z}{}|}}(B")
("mdw" "$(C}~(B"))
+
+;;; hanja3.el ends here
diff --git a/leim/quail/hebrew.el b/leim/quail/hebrew.el
index c7a998dae9..9e6be10680 100644
--- a/leim/quail/hebrew.el
+++ b/leim/quail/hebrew.el
@@ -1,4 +1,4 @@
-;; Quail package for inputting Hebrew characters.
+;;; hebrew.el --- Quail package for inputting Hebrew characters
;; Copyright (C) 1998 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
@@ -22,6 +22,10 @@
;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
;; Boston, MA 02111-1307, USA.
+;;; Commentary:
+
+;;; Code:
+
(require 'quail)
(quail-define-package
@@ -69,5 +73,6 @@ Hebrew letters are assigned to lowercases.
("," ?,Hz(B)
("." ?,Hu(B)
("/" ?.)
- ("'" ?,)
- )
+ ("'" ?,))
+
+;;; hebrew.el ends here
diff --git a/leim/quail/ipa.el b/leim/quail/ipa.el
index 41a5f27fe4..3192890179 100644
--- a/leim/quail/ipa.el
+++ b/leim/quail/ipa.el
@@ -1,4 +1,4 @@
-;;; quail/ipa.el -- Quail package for inputting IPA characters
+;;; ipa.el --- Quail package for inputting IPA characters
;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
@@ -22,6 +22,8 @@
;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
;; Boston, MA 02111-1307, USA.
+;;; Commentary:
+
;;; Code:
(require 'quail)
@@ -105,3 +107,5 @@ Upside-down characters are obtained by a preceding slash (/)."
("'" ?,0p(B)
("`" ?,0q(B)
(":" ?,0r(B))
+
+;;; ipa.el ends here
diff --git a/leim/quail/japanese.el b/leim/quail/japanese.el
index f9f2837c6c..6cf25ae8b5 100644
--- a/leim/quail/japanese.el
+++ b/leim/quail/japanese.el
@@ -1,4 +1,4 @@
-;;; quail/japanese.el --- Quail package for inputting Japanese
+;;; japanese.el --- Quail package for inputting Japanese
;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
@@ -22,6 +22,8 @@
;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
;; Boston, MA 02111-1307, USA.
+;;; Commentary:
+
;;; Code:
(require 'quail)
@@ -541,3 +543,4 @@ qq: toggle between this input method and the input method `japanese-ascii'.
(vector (japanese-katakana (aref trans 0))))
(t trans)))))
+;;; japanese.el ends here
diff --git a/leim/quail/lao.el b/leim/quail/lao.el
index 955420af55..cb39f662f3 100644
--- a/leim/quail/lao.el
+++ b/leim/quail/lao.el
@@ -1,4 +1,4 @@
-;;; quail/lao.el --- Quail package for inputting Lao characters
+;;; lao.el --- Quail package for inputting Lao characters
;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
@@ -22,6 +22,8 @@
;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
;; Boston, MA 02111-1307, USA.
+;;; Commentary:
+
;;; Code:
(require 'quail)
@@ -195,4 +197,4 @@
(v-state (lao-vowel-key-alist . t-state))
(t-state lao-tone-key-alist))))
-;;; quail/lao.el ends here
+;;; lao.el ends here
diff --git a/leim/quail/latin-alt.el b/leim/quail/latin-alt.el
index 2c254887b7..7145ccc51b 100644
--- a/leim/quail/latin-alt.el
+++ b/leim/quail/latin-alt.el
@@ -1,4 +1,4 @@
-;; Quail packages for inputting various European characters.
+;;; latin-alt.el --- Quail packages for inputting various European characters
;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
@@ -24,6 +24,10 @@
;; Author: TAKAHASHI Naoto <ntakahas@etl.go.jp>
+;;; Commentary:
+
+;;; Code:
+
(require 'quail)
(quail-define-package
@@ -1524,3 +1528,5 @@ Doubling the postfix separates the letter and postfix: e.g. a^^ -> a^
("U^^" ["U^"])
("u^^" ["u^"])
)
+
+;;; latin-alt.el ends here
diff --git a/leim/quail/latin-ltx.el b/leim/quail/latin-ltx.el
index aaab74b93a..4fe3d9456b 100644
--- a/leim/quail/latin-ltx.el
+++ b/leim/quail/latin-ltx.el
@@ -1,4 +1,4 @@
-;;; quail/latin-ltx.el -- Quail package for TeX-style input -*-coding: iso-2022-7bit-*-
+;;; latin-ltx.el --- Quail package for TeX-style input -*-coding: iso-2022-7bit-*-
;; Copyright (C) 2001 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
@@ -23,6 +23,8 @@
;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
;; Boston, MA 02111-1307, USA.
+;;; Commentary:
+
;;; Code:
(require 'quail)
@@ -900,3 +902,5 @@ system, including many technical ones. Examples:
("\\mu" ?$,1'<(B)
("\\rho" ?$,1'A(B)
)
+
+;;; latin-ltx.el ends here
diff --git a/leim/quail/latin-post.el b/leim/quail/latin-post.el
index 725ad58c40..44798389da 100644
--- a/leim/quail/latin-post.el
+++ b/leim/quail/latin-post.el
@@ -1,4 +1,4 @@
-;; Quail packages for inputting various European characters.
+;;; latin-post.el --- Quail packages for inputting various European characters
;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
@@ -24,6 +24,10 @@
;; Author: TAKAHASHI Naoto <ntakahas@etl.go.jp>
+;;; Commentary:
+
+;;; Code:
+
(require 'quail)
(quail-define-package
@@ -2121,3 +2125,5 @@ Dead accent is right to ,Af(B." nil t t t t nil nil nil nil nil t)
(">" ?V)
("?" ?Z)
)
+
+;;; latin-post.el ends here
diff --git a/leim/quail/latin-pre.el b/leim/quail/latin-pre.el
index 222dbb8514..e75de685ac 100644
--- a/leim/quail/latin-pre.el
+++ b/leim/quail/latin-pre.el
@@ -1,4 +1,4 @@
-;;; latin-pre.el -- Quail packages for inputting various European characters.
+;;; latin-pre.el --- Quail packages for inputting various European characters
;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
@@ -31,8 +31,8 @@
;; by R.F. Smith <rsmith@xs4all.nl>
;;
;; polish-slash:
-;; Author: W,B3(Bodek Bzyl <matwb@univ.gda.pl>
-;; Maintainer: W,B3(Bodek Bzyl <matwb@univ.gda.pl>
+;; Author: W,B3(Bodek Bzyl <matwb@univ.gda.pl>
+;; Maintainer: W,B3(Bodek Bzyl <matwb@univ.gda.pl>
;;
;; latin-[89]-prefix: Dave Love <fx@gnu.org>
@@ -62,7 +62,7 @@
symbol | ^ | ^r -> ,A.(B ^c -> ,A)(B ^1 -> ,A9(B ^2 -> ,A2(B ^3 -> ,A3(B
" nil t nil nil nil nil nil nil nil nil t)
-;; Fixme: should we have non-break space somehow? Is so, how?
+;; Fixme: should we have non-break space somehow? If so, how?
(quail-define-rules
("'A" ?,AA(B)
("'E" ?,AI(B)
@@ -979,3 +979,5 @@ For example, the character named `aogonek' is obtained by `/a'."
("~$" ?,_#(B)
("^r" ?,_.(B)
("^c" ?,_)(B))
+
+;;; latin-pre.el ends here
diff --git a/leim/quail/lrt.el b/leim/quail/lrt.el
index bdc1cc71cb..4348d87a8a 100644
--- a/leim/quail/lrt.el
+++ b/leim/quail/lrt.el
@@ -1,4 +1,4 @@
-;;; quail/lrt.el --- Quail package for inputting Lao characters by LRT method
+;;; lrt.el --- Quail package for inputting Lao characters by LRT method
;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
@@ -22,6 +22,8 @@
;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
;; Boston, MA 02111-1307, USA.
+;;; Commentary:
+
;;; Code:
(require 'quail)
@@ -74,4 +76,4 @@
lao-transcription-tone-alist)
(t-state lao-transcription-tone-alist))))
-;;; quail/lrt.el ends here
+;;; lrt.el ends here
diff --git a/leim/quail/py-punct.el b/leim/quail/py-punct.el
index b903f214e4..a2f9c7fef2 100644
--- a/leim/quail/py-punct.el
+++ b/leim/quail/py-punct.el
@@ -1,4 +1,4 @@
-;; quail/py-punct.el -- Quail packages for Chinese (pinyin + extra symbols)
+;;; py-punct.el --- Quail packages for Chinese (pinyin + extra symbols)
;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
@@ -24,6 +24,10 @@
;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
;; Boston, MA 02111-1307, USA.
+;;; Commentary:
+
+;;; Code:
+
(require 'quail)
(load "quail/PY")
@@ -65,3 +69,5 @@ For instance, typing `v' and `%' insert `$A#%(B'.
")
(quail-defrule "v" (nth 2 (assoc "chinese-punct-b5" quail-package-alist)))
+
+;;; py-punct.el ends here
diff --git a/leim/quail/pypunct-b5.el b/leim/quail/pypunct-b5.el
index 2863a9490d..e07593e23a 100644
--- a/leim/quail/pypunct-b5.el
+++ b/leim/quail/pypunct-b5.el
@@ -1,4 +1,4 @@
-;; quail/pypunct-b5.el -- Quail packages for Chinese (pinyin + extra symbols)
+;;; pypunct-b5.el --- Quail packages for Chinese (pinyin + extra symbols)
;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
@@ -24,6 +24,10 @@
;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
;; Boston, MA 02111-1307, USA.
+;;; Commentary:
+
+;;; Code:
+
(require 'quail)
(load "quail/PY-b5")
@@ -48,3 +52,5 @@ For instance, typing `v' and `%' insert `$(0"h(B'.
(nth 2 (assoc "chinese-py-b5" quail-package-alist)))
(quail-defrule "v" (nth 2 (assoc "chinese-punct-b5" quail-package-alist)))
+
+;;; pypunct-b5.el ends here
diff --git a/leim/quail/slovak.el b/leim/quail/slovak.el
index b92dba625c..18c7dd57e2 100644
--- a/leim/quail/slovak.el
+++ b/leim/quail/slovak.el
@@ -1,10 +1,10 @@
-;;; quail/slovak.el -- Quail package for inputting Slovak
+;;; slovak.el --- Quail package for inputting Slovak
;; Copyright (C) 1998, 2001 Free Software Foundation.
-;; Authors: Tibor ,B)(Bimko <tibor.simko@fmph.uniba.sk>,
-;; Milan Zamazal <pdm@zamazal.org>
-;; Maintainer: Pavel Jan,Al(Bk <Pavel@Janik.cz>
+;; Authors: Tibor ,B)(Bimko <tibor.simko@fmph.uniba.sk>
+;; Milan Zamazal <pdm@zamazal.org>
+;; Maintainer: Pavel Jan,Bm(Bk <Pavel@Janik.cz>
;; Keywords: multilingual, input method, Slovak
;; This file is part of GNU Emacs.
@@ -34,7 +34,6 @@
(require 'quail)
-
(quail-define-package
"slovak" "Slovak" "SK" t
"Standard Slovak keyboard."
@@ -477,3 +476,5 @@ All other keys are the same as on standard US keyboard."
([kp-9] ?9)
([kp-0] ?0)
([kp-add] ?+))
+
+;;; slovak.el ends here
diff --git a/leim/quail/symbol-ksc.el b/leim/quail/symbol-ksc.el
index abacb4df36..5ccf9dd6fc 100644
--- a/leim/quail/symbol-ksc.el
+++ b/leim/quail/symbol-ksc.el
@@ -1,4 +1,4 @@
-;;; quail/symbol-ksc.el --- Quail-package for Korean Symbol (KSC5601)
+;;; symbol-ksc.el --- Quail-package for Korean Symbol (KSC5601)
;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
@@ -26,6 +26,7 @@
;;; 94.11.04 Updated for Mule Ver.2.1 (koaunghi.un@zdv.uni-tuebingen.de)
;;; 96.09.23 Updated for emacs-19.33-beta (koaunghi.un@zdv.uni-tuebingen.de)
+;;; Commentary:
;;; Code:
@@ -196,3 +197,5 @@
("kata" "$(C+"+#+$+%+&+'+(+)+*+++,+-+.+/+0+1+2+3+4+5+6+7+8+9+:+;+<+=+>+?+@+A+B+C+D+E+F+G+H+I+J+K+L+M+N+O+P+Q+R+S+T+U+V+W+X+Y+[+Z+\+]+^+_+`+a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+q+r+s+t+u+v(B")
("Russ" "$(C,",#,$,%,&,',(,),*,+,,,-,.,/,0,1,2,3,4,5,6,7,8,9,:,;,<,=,>,?,@,A(B")
("russ" "$(C,Q,R,S,T,U,V,W,X,Y,[,Z,\,],^,_,`,a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q(B"))
+
+;;; symbol-ksc.el ends here
diff --git a/leim/quail/thai.el b/leim/quail/thai.el
index c6b5164707..ec7bffa937 100644
--- a/leim/quail/thai.el
+++ b/leim/quail/thai.el
@@ -1,4 +1,4 @@
-;;; quail/thai.el --- Quail package for inputting Thai characters
+;;; thai.el --- Quail package for inputting Thai characters
;; Copyright (C) 1995 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
@@ -22,6 +22,8 @@
;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
;; Boston, MA 02111-1307, USA.
+;;; Commentary:
+
;;; Code:
(require 'quail)
@@ -125,3 +127,5 @@ The difference from the ordinal Thai keyboard:
",Ta(B" ",Tg(B" ",TM(B" ",T7(B" ",TC(B" ",T4(B" ",TK(B" ",T5(B" ; p .. w
",T;(B" ",Th(B" ",T:(B" ",TO(B" ",Tm(B" ",TF(B" ",T%(B" 0 ; x .. DEL
]))
+
+;;; thai.el ends here
diff --git a/leim/quail/tibetan.el b/leim/quail/tibetan.el
index 83b2fb8272..75ca75e346 100644
--- a/leim/quail/tibetan.el
+++ b/leim/quail/tibetan.el
@@ -1,4 +1,4 @@
-;;; quail/tibetan.el -- Quail package for inputting Tibetan characters
+;;; tibetan.el --- Quail package for inputting Tibetan characters
;; Copyright (C) 1995 Free Software Foundation, Inc.
;; Copyright (C) 1995 Electrotechnical Laboratory, JAPAN.
@@ -29,6 +29,8 @@
;; 1997.03.13 Support for inputting special signs and punctuations added.
;; (Only Ext. Wylie input)
+;;; Commentary:
+
;;; Code:
(require 'quail)
@@ -447,3 +449,5 @@
(s-state (tibetan-subjoined-tibkey-alist . s-state)
(tibetan-vowel-tibkey-alist . m-state))
(m-state tibetan-modifier-tibkey-alist))))
+
+;;; tibetan.el ends here
diff --git a/leim/quail/viqr.el b/leim/quail/viqr.el
index d619f50f81..00328b3f64 100644
--- a/leim/quail/viqr.el
+++ b/leim/quail/viqr.el
@@ -1,4 +1,4 @@
-;; quail/viqr.el -- Quail packages for inputting Vietnamese with VIQR system
+;;; viqr.el --- Quail packages for inputting Vietnamese with VIQR system
;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
@@ -22,6 +22,8 @@
;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
;; Boston, MA 02111-1307, USA.
+;;; Commentary:
+
;;; Code:
(require 'quail)
@@ -66,4 +68,4 @@
(viet-quail-define-rules)
-;;; quail/viqr.el ends here
+;;; viqr.el ends here