Mercurial > emacs

changeset 38453:519983161a46

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Some fixes to follow lisp coding conventions and typo fixes.
author Pavel Janík <Pavel@Janik.cz>
date Mon, 16 Jul 2001 20:22:24 +0000
parents e1e6c0c30e69
children 50af5df02a87
files leim/ChangeLog leim/ja-dic/ja-dic.el leim/quail/cyril-jis.el leim/quail/cyrillic.el leim/quail/czech.el leim/quail/devanagari.el leim/quail/ethiopic.el leim/quail/greek.el leim/quail/hangul.el leim/quail/hangul3.el leim/quail/hanja-jis.el leim/quail/hanja.el leim/quail/hanja3.el leim/quail/hebrew.el leim/quail/ipa.el leim/quail/japanese.el leim/quail/lao.el leim/quail/latin-alt.el leim/quail/latin-ltx.el leim/quail/latin-post.el leim/quail/latin-pre.el leim/quail/lrt.el leim/quail/py-punct.el leim/quail/pypunct-b5.el leim/quail/slovak.el leim/quail/symbol-ksc.el leim/quail/thai.el leim/quail/tibetan.el leim/quail/viqr.el
diffstat 29 files changed, 155 insertions(+), 48 deletions(-) [+]
line wrap: on
line diff
--- a/leim/ChangeLog	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/ChangeLog	Mon Jul 16 20:22:24 2001 +0000
@@ -1,3 +1,16 @@
+2001-07-16  Pavel Jan,Bm(Bk  <Pavel@Janik.cz>
+
+	* ja-dic/ja-dic.el, quail/cyril-jis.el, quail/cyrillic.el,
+	quail/czech.el, quail/devanagari.el, quail/ethiopic.el,
+	quail/greek.el, quail/hangul.el, quail/hangul3.el,
+	quail/hanja-jis.el, quail/hanja.el, quail/hanja3.el,
+	quail/hebrew.el, quail/ipa.el, quail/japanese.el, quail/lao.el,
+	quail/latin-alt.el, quail/latin-ltx.el, quail/latin-post.el,
+	quail/latin-pre.el, quail/lrt.el, quail/py-punct.el,
+	quail/pypunct-b5.el, quail/slovak.el, quail/symbol-ksc.el,
+	quail/thai.el, quail/tibetan.el, quail/viqr.el: Some fixes to
+	follow coding conventions.
+
 2001-06-04  Andrew Choi  <akochoi@i-cable.com>
 
 	* quail/.cvsignore: Change CTLauB.el to CTLau-b5.el.
--- a/leim/ja-dic/ja-dic.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/ja-dic/ja-dic.el	Mon Jul 16 20:22:24 2001 +0000
@@ -1,9 +1,9 @@
-;; ja-dic.el -- dictionary for Japanese input method
+;;; ja-dic.el --- dictionary for Japanese input method
 ;;	Generated by the command `skkdic-convert'
 ;;	Date: Sat Dec 16 09:09:04 2000
 ;;	Original SKK dictionary file: SKK-JISYO.L
 
-;;; Comment:
+;;; Commentary:
 
 ;; Do byte-compile this file again after any modification.
 
@@ -20,6 +20,8 @@
 ;; Yukiyoshi Kameyama, Akihiko Sasaki, Dai Ando, Junichi Okukawa, 
 ;; Katsushi Sato and Nobuhiro Yamagishi
 ;; 
+;; This file is part of GNU Emacs.
+;;
 ;; This dictionary is free software; you can redistribute it and/or modify
 ;; it under the terms of the GNU General Public License as published by
 ;; the Free Software Foundation; either versions 2, or (at your option)
@@ -54580,4 +54582,4 @@
 ;;
 (provide 'ja-dic)
 
-;; ja-dic.el ends here
+;;; ja-dic.el ends here
--- a/leim/quail/cyril-jis.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/cyril-jis.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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
--- a/leim/quail/cyrillic.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/cyrillic.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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 @@
  ("/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
--- a/leim/quail/czech.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/czech.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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 @@
  ([kp-9] ?9)
  ([kp-0] ?0)
  ([kp-add] ?+))
+
+;;; czech.el ends here
--- a/leim/quail/devanagari.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/devanagari.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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 @@
 		      )
 
 (devanagari-hindi-transliteration-quail-define-rules)
+
+;;; devanagari.el ends here
--- a/leim/quail/ethiopic.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/ethiopic.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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 @@
 		 (if (ethio-prefer-amharic-p) ?$(3"c(B ?$(3"f(B)
 		 "ethiopic"))
 
-;;; quail/ethiopic.el ends here
+;;; ethiopic.el ends here
--- a/leim/quail/greek.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/greek.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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 @@
  ("Y:" ?,F[(B)
  ("i:;" ?,F@(B)
  ("y:;" ?,F`(B))
+
+;;; greek.el ends here
--- a/leim/quail/hangul.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/hangul.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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 @@
  ("SA"	?$(C!J(B)
  ("SC/"	?$(C!K(B)
  ("SF"	?$(C"5(B))
+
+;;; hangul.el ends here
--- a/leim/quail/hangul3.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/hangul3.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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
--- a/leim/quail/hanja-jis.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/hanja-jis.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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
--- a/leim/quail/hanja.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/hanja.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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
--- a/leim/quail/hanja3.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/hanja3.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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
--- a/leim/quail/hebrew.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/hebrew.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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 @@
  ("," ?,Hz(B)
  ("." ?,Hu(B)
  ("/" ?.)
- ("'" ?,)
- )
+ ("'" ?,))
+
+;;; hebrew.el ends here
--- a/leim/quail/ipa.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/ipa.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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 @@
  ("'" ?,0p(B)
  ("`" ?,0q(B)
  (":" ?,0r(B))
+
+;;; ipa.el ends here
--- a/leim/quail/japanese.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/japanese.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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 @@
 			  (vector (japanese-katakana (aref trans 0))))
 			 (t trans)))))
 
+;;; japanese.el ends here
--- a/leim/quail/lao.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/lao.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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
--- a/leim/quail/latin-alt.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/latin-alt.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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 @@
  ("U^^" ["U^"])
  ("u^^" ["u^"])
  )
+
+;;; latin-alt.el ends here
--- a/leim/quail/latin-ltx.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/latin-ltx.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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 @@
  ("\\mu" ?$,1'<(B)
  ("\\rho" ?$,1'A(B)
 )
+
+;;; latin-ltx.el ends here
--- a/leim/quail/latin-post.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/latin-post.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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 @@
  (">" ?V)
  ("?" ?Z)
  )
+
+;;; latin-post.el ends here
--- a/leim/quail/latin-pre.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/latin-pre.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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 @@
  ("~$" ?,_#(B)
  ("^r" ?,_.(B)
  ("^c" ?,_)(B))
+
+;;; latin-pre.el ends here
--- a/leim/quail/lrt.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/lrt.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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
--- a/leim/quail/py-punct.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/py-punct.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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 @@
 ")
 
 (quail-defrule "v" (nth 2 (assoc "chinese-punct-b5" quail-package-alist)))
+
+;;; py-punct.el ends here
--- a/leim/quail/pypunct-b5.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/pypunct-b5.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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 @@
 	(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
--- a/leim/quail/slovak.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/slovak.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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 @@
  ([kp-9] ?9)
  ([kp-0] ?0)
  ([kp-add] ?+))
+
+;;; slovak.el ends here
--- a/leim/quail/symbol-ksc.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/symbol-ksc.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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
--- a/leim/quail/thai.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/thai.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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 @@
     ",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
--- a/leim/quail/tibetan.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/tibetan.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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
--- a/leim/quail/viqr.el	Mon Jul 16 18:41:09 2001 +0000
+++ b/leim/quail/viqr.el	Mon Jul 16 20:22:24 2001 +0000
@@ -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