diff options
author | Pavel Janík <Pavel@Janik.cz> | 2001-07-16 20:22:24 +0000 |
---|---|---|
committer | Pavel Janík <Pavel@Janik.cz> | 2001-07-16 20:22:24 +0000 |
commit | be567141bcb5e39ca67cdb120b0bad899704eacc (patch) | |
tree | b49776d8e5e7a7d401e8e3c89c2acabfca461737 /leim/quail | |
parent | 358a9f5055cb4dec6d22d4f12a3f93da2288fc53 (diff) |
Some fixes to follow lisp coding conventions and typo fixes.
Diffstat (limited to 'leim/quail')
-rw-r--r-- | leim/quail/cyril-jis.el | 4 | ||||
-rw-r--r-- | leim/quail/cyrillic.el | 10 | ||||
-rw-r--r-- | leim/quail/czech.el | 6 | ||||
-rw-r--r-- | leim/quail/devanagari.el | 4 | ||||
-rw-r--r-- | leim/quail/ethiopic.el | 6 | ||||
-rw-r--r-- | leim/quail/greek.el | 6 | ||||
-rw-r--r-- | leim/quail/hangul.el | 6 | ||||
-rw-r--r-- | leim/quail/hangul3.el | 6 | ||||
-rw-r--r-- | leim/quail/hanja-jis.el | 6 | ||||
-rw-r--r-- | leim/quail/hanja.el | 6 | ||||
-rw-r--r-- | leim/quail/hanja3.el | 6 | ||||
-rw-r--r-- | leim/quail/hebrew.el | 11 | ||||
-rw-r--r-- | leim/quail/ipa.el | 6 | ||||
-rw-r--r-- | leim/quail/japanese.el | 5 | ||||
-rw-r--r-- | leim/quail/lao.el | 6 | ||||
-rw-r--r-- | leim/quail/latin-alt.el | 8 | ||||
-rw-r--r-- | leim/quail/latin-ltx.el | 6 | ||||
-rw-r--r-- | leim/quail/latin-post.el | 8 | ||||
-rw-r--r-- | leim/quail/latin-pre.el | 10 | ||||
-rw-r--r-- | leim/quail/lrt.el | 6 | ||||
-rw-r--r-- | leim/quail/py-punct.el | 8 | ||||
-rw-r--r-- | leim/quail/pypunct-b5.el | 8 | ||||
-rw-r--r-- | leim/quail/slovak.el | 11 | ||||
-rw-r--r-- | leim/quail/symbol-ksc.el | 5 | ||||
-rw-r--r-- | leim/quail/thai.el | 6 | ||||
-rw-r--r-- | leim/quail/tibetan.el | 6 | ||||
-rw-r--r-- | leim/quail/viqr.el | 6 |
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 |