diff options
author | Glenn Morris <rgm@gnu.org> | 2013-11-26 22:15:06 -0800 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2013-11-26 22:15:06 -0800 |
commit | cb6c95a394d9a9d2f068bf8ee240f2d2297867d1 (patch) | |
tree | 6da24e3ad26db4ab42d800dd78feea2eee3d79d9 /lisp/leim/quail/slovak.el | |
parent | 4cbac8e94b68297189524f2db456c776bda4ed69 (diff) | |
download | emacs-cb6c95a394d9a9d2f068bf8ee240f2d2297867d1.tar.gz emacs-cb6c95a394d9a9d2f068bf8ee240f2d2297867d1.tar.bz2 emacs-cb6c95a394d9a9d2f068bf8ee240f2d2297867d1.zip |
Move runtime leim lisp files to lisp/leim directory
This allows us to reuse much of the lisp build and installation machinery,
rather than duplicating it.
* Makefile.in (abs_builddir, leimdir): Remove.
(buildlisppath, SUBDIR, COPYDIR, COPYDESTS): No more leim directory.
(epaths-force-w32): No longer set BLD.
(leim): Remove.
(install-arch-indep): No longer run or install leim.
(mostlyclean, clean): No longer run leim rule.
(bootstrap-clean): Change leim target.
(maintainer-clean): Add leim.
(check-declare): Remove leim.
* README: Update for leim changes.
* configure.ac (leimdir): Remove.
(standardlisppath): No more leimdir.
* make-dist: Update for files from leim/ now being in lisp/leim/.
* doc/lispref/loading.texi (Library Search):
* doc/lispref/os.texi (Startup Summary): No more leim directory.
* leim/Makefile.in (leimdir): New variable.
(TIT_GB, TIT_BIG5, MISC, changed.tit, changed.misc)
(${leimdir}/leim-list.el, ${leimdir}/ja-dic/ja-dic.el):
Generate in $leimdir.
(all): Remove compilation, add ja-dic.
(leim-list.el): Now PHONY.
(setwins, compile-targets, compile-main, clean, mostlyclean)
(extraclean): Remove.
(bootstrap-clean): Delete all generated files.
* leim/README: Update for moved leim/ directory.
* leim/leim-ext.el (ucs-input-activate, hangul-input-method-activate):
Remove manual autoloads; now in loaddefs.el.
Disable byte-compile, version-control, autoloads in the output.
* lisp/Makefile.in (setwins_for_subdirs): Skip leim/ directory.
(compile-main): Depend on lisp/leim rule.
(leim): New rule.
* lisp/loadup.el: Move leim-list.el to leim/ subdirectory.
* lisp/startup.el (normal-top-level): No more leim directory.
* lisp/international/ja-dic-cnv.el (skkdic-convert):
Disable version-control and autoloads in output files.
* lisp/international/titdic-cnv.el (titdic-convert, miscdic-convert):
Disable version-control and autoloads in output files.
* lisp/leim/quail: Move here from ../leim.
* lisp/leim/quail/hangul.el (hangul-input-method-activate):
Add autoload cookie.
(generated-autoload-load-name): Set file-local value.
* lisp/leim/quail/uni-input.el (ucs-input-activate): Add autoload cookie.
(generated-autoload-load-name): Set file-local value.
* nt/README.W32:
* nt/addpm.c (env_vars):
* nt/epaths.nt (PATH_LOADSEARCH, PATH_DUMPLOADSEARCH):
* nt/paths.h (PATH_LOADSEARCH): No more leim directory.
* src/Makefile.in (leimdir): Now in lisp source directory.
($(leimdir)/leim-list.el): Just use ../leim .
* src/epaths.in (PATH_DUMPLOADSEARCH):
* src/lread.c (load_path_default):
* src/nsterm.m (ns_load_path): No more leim directory.
* .bzrignore: Update for relocated leim files.
Diffstat (limited to 'lisp/leim/quail/slovak.el')
-rw-r--r-- | lisp/leim/quail/slovak.el | 479 |
1 files changed, 479 insertions, 0 deletions
diff --git a/lisp/leim/quail/slovak.el b/lisp/leim/quail/slovak.el new file mode 100644 index 00000000000..10d111421cc --- /dev/null +++ b/lisp/leim/quail/slovak.el @@ -0,0 +1,479 @@ +;;; slovak.el --- Quail package for inputting Slovak -*-coding: utf-8;-*- + +;; Copyright (C) 1998, 2001-2013 Free Software Foundation, Inc. + +;; Authors: Tibor Šimko <tibor.simko@fmph.uniba.sk> +;; Milan Zamazal <pdm@zamazal.org> +;; Maintainer: Pavel Janík <Pavel@Janik.cz> +;; Keywords: i18n, multilingual, input method, Slovak + +;; This file is part of GNU Emacs. + +;; GNU Emacs 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 version 3 of the License, or +;; (at your option) any later version. + +;; GNU Emacs is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. + +;; You should have received a copy of the GNU General Public License +;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. + +;;; Commentary: + +;; This file defines the following Slovak keyboards: +;; - standard Slovak keyboard +;; - three Slovak keyboards for programmers + +;;; Code: + +(require 'quail) + + +(quail-define-package + "slovak" "Slovak" "SK" t + "Standard Slovak keyboard." + nil t nil nil t nil nil nil nil nil t) + +(quail-define-rules + ("1" ?+) + ("2" ?ľ) + ("3" ?š) + ("4" ?č) + ("5" ?ť) + ("6" ?ž) + ("7" ?ý) + ("8" ?á) + ("9" ?í) + ("0" ?é) + ("!" ?1) + ("@" ?2) + ("#" ?3) + ("$" ?4) + ("%" ?5) + ("^" ?6) + ("&" ?7) + ("*" ?8) + ("(" ?9) + (")" ?0) + ("-" ?=) + ("_" ?%) + ("=" ?') + ("[" ?ú) + ("{" ?/) + ("]" ?ä) + ("}" ?\() + ("\\" ?ň) + ("|" ?\)) + (";" ?ô) + (":" ?\") + ("'" ?§) + ("\"" ?!) + ("<" ??) + (">" ?:) + ("/" ?-) + ("?" ?_) + ("`" ?\;) + ("~" ?^) + ("y" ?z) + ("z" ?y) + ("Y" ?Z) + ("Z" ?Y) + ("=a" ?á) + ("+a" ?ä) + ("+=a" ?ä) + ("+c" ?č) + ("+d" ?ď) + ("=e" ?é) + ("+e" ?ě) + ("=i" ?í) + ("=l" ?ĺ) + ("+l" ?ľ) + ("+n" ?ň) + ("=o" ?ó) + ("+o" ?ô) + ("~o" ?ô) + ("+=o" ?ö) + ("=r" ?ŕ) + ("+r" ?ř) + ("=s" ?ß) + ("+s" ?š) + ("+t" ?ť) + ("=u" ?ú) + ("+u" ?ů) + ("+=u" ?ü) + ("=z" ?ý) + ("+y" ?ž) + ("=A" ?Á) + ("+A" ?Ä) + ("+=A" ?Ä) + ("+C" ?Č) + ("+D" ?Ď) + ("=E" ?É) + ("+E" ?Ě) + ("=I" ?Í) + ("=L" ?Ĺ) + ("+L" ?Ľ) + ("+N" ?Ň) + ("=O" ?Ó) + ("+O" ?Ô) + ("~O" ?Ô) + ("+=O" ?Ö) + ("=R" ?Ŕ) + ("+R" ?Ř) + ("=S" ?ß) + ("+S" ?Š) + ("+T" ?Ť) + ("=U" ?Ú) + ("+U" ?Ů) + ("+=U" ?Ü) + ("=Z" ?Ý) + ("+Y" ?Ž) + ("=q" ?`) + ("=2" ?@) + ("=3" ?#) + ("=4" ?$) + ("=5" ?%) + ("=6" ?^) + ("=7" ?&) + ("=8" ?*) + ("=9" ?\() + ("=0" ?\)) + ("+1" ?!) + ("+2" ?@) + ("+3" ?#) + ("+4" ?$) + ("+5" ?%) + ("+6" ?^) + ("+7" ?&) + ("+8" ?*) + ("+9" ?\() + ("+0" ?\)) + ([kp-1] ?1) + ([kp-2] ?2) + ([kp-3] ?3) + ([kp-4] ?4) + ([kp-5] ?5) + ([kp-6] ?6) + ([kp-7] ?7) + ([kp-8] ?8) + ([kp-9] ?9) + ([kp-0] ?0) + ([kp-add] ?+)) + + +(quail-define-package + "slovak-prog-1" "Slovak" "SK" t + "Slovak (non-standard) keyboard for programmers #1. + +All digits except of `1' are replaced by Slovak characters as on the standard +Slovak keyboard. +Dead keys are on `[', `[[', and `[[['. +All other keys are the same as on standard US keyboard." + nil t nil nil t nil nil nil nil nil t) + +(quail-define-rules + ("[[[[" ?\[) + ("2" ?ľ) + ("3" ?š) + ("4" ?č) + ("5" ?ť) + ("6" ?ž) + ("7" ?ý) + ("8" ?á) + ("9" ?í) + ("0" ?é) + ("[a" ?á) + ("[[a" ?ä) + ("[[[a" ?ä) + ("[c" ?č) + ("[[c" ?č) + ("[d" ?ď) + ("[[d" ?ď) + ("[e" ?é) + ("[[e" ?ě) + ("[i" ?í) + ("[l" ?ĺ) + ("[[l" ?ľ) + ("[n" ?ň) + ("[[n" ?ň) + ("[o" ?ó) + ("[[o" ?ô) + ("[[[o" ?ö) + ("[r" ?ŕ) + ("[[r" ?ř) + ("[s" ?š) + ("[[s" ?š) + ("[[[s" ?ß) + ("[t" ?ť) + ("[[t" ?ť) + ("[u" ?ú) + ("[[u" ?ů) + ("[[[u" ?ü) + ("[y" ?ý) + ("[z" ?ž) + ("[[z" ?ž) + ("[A" ?Á) + ("[[A" ?Ä) + ("[[[A" ?Ä) + ("[C" ?Č) + ("[[C" ?Č) + ("[D" ?Ď) + ("[[D" ?Ď) + ("[E" ?É) + ("[[E" ?Ě) + ("[I" ?Í) + ("[L" ?Ĺ) + ("[[L" ?Ľ) + ("[N" ?Ň) + ("[[N" ?Ň) + ("[O" ?Ó) + ("[[O" ?Ô) + ("[[[O" ?Ö) + ("[R" ?Ŕ) + ("[[R" ?Ř) + ("[S" ?Š) + ("[[S" ?Š) + ("[[[S" ?ß) + ("[T" ?Ť) + ("[[T" ?Ť) + ("[U" ?Ú) + ("[[U" ?Ů) + ("[[[U" ?Ü) + ("[Y" ?Ý) + ("[Z" ?Ž) + ("[[Z" ?Ž) + ([kp-1] ?1) + ([kp-2] ?2) + ([kp-3] ?3) + ([kp-4] ?4) + ([kp-5] ?5) + ([kp-6] ?6) + ([kp-7] ?7) + ([kp-8] ?8) + ([kp-9] ?9) + ([kp-0] ?0) + ([kp-add] ?+)) + + +(quail-define-package + "slovak-prog-2" "Slovak" "SK" t + "Slovak (non-standard) keyboard for programmers #2. + +All digits except of `1' are replaced by Slovak characters as on the standard +Slovak keyboard. +Dead keys are on `=' and `+'. +All other keys are the same as on standard US keyboard." + nil t nil nil t nil nil nil nil nil t) + +(quail-define-rules + ("2" ?ľ) + ("3" ?š) + ("4" ?č) + ("5" ?ť) + ("6" ?ž) + ("7" ?ý) + ("8" ?á) + ("9" ?í) + ("0" ?é) + ("==" ?=) + ("++" ?+) + ("=+" ?+) + ("=2" ?2) + ("=3" ?3) + ("=4" ?4) + ("=5" ?5) + ("=6" ?6) + ("=7" ?7) + ("=8" ?8) + ("=9" ?9) + ("=0" ?0) + ("+2" ?2) + ("+3" ?3) + ("+4" ?4) + ("+5" ?5) + ("+6" ?6) + ("+7" ?7) + ("+8" ?8) + ("+9" ?9) + ("+0" ?0) + ("=a" ?á) + ("+a" ?ä) + ("+=a" ?ä) + ("+c" ?č) + ("+d" ?ď) + ("=e" ?é) + ("+e" ?ě) + ("=i" ?í) + ("=l" ?ĺ) + ("+l" ?ľ) + ("+n" ?ň) + ("=o" ?ó) + ("+o" ?ô) + ("+=o" ?ö) + ("=r" ?ŕ) + ("+r" ?ř) + ("=s" ?ß) + ("+s" ?š) + ("+t" ?ť) + ("=u" ?ú) + ("+u" ?ů) + ("+=u" ?ü) + ("=y" ?ý) + ("+z" ?ž) + ("=A" ?Á) + ("+A" ?Ä) + ("+=A" ?Ä) + ("+C" ?Č) + ("+D" ?Ď) + ("=E" ?É) + ("+E" ?Ě) + ("=I" ?Í) + ("=L" ?Ĺ) + ("+L" ?Ľ) + ("+N" ?Ň) + ("=O" ?Ó) + ("+O" ?Ô) + ("+=O" ?Ö) + ("=R" ?Ŕ) + ("+R" ?Ř) + ("=S" ?ß) + ("+S" ?Š) + ("+T" ?Ť) + ("=U" ?Ú) + ("+U" ?Ů) + ("+=U" ?Ü) + ("=Y" ?Ý) + ("+Z" ?Ž) + ([kp-1] ?1) + ([kp-2] ?2) + ([kp-3] ?3) + ([kp-4] ?4) + ([kp-5] ?5) + ([kp-6] ?6) + ([kp-7] ?7) + ([kp-8] ?8) + ([kp-9] ?9) + ([kp-0] ?0) + ([kp-add] ?+)) + + +(quail-define-package + "slovak-prog-3" "Slovak" "SK" t + "Slovak (non-standard) keyboard for programmers #3. + +Dead keys are on `[', `[[', `[[[', and `]'. +All other keys are the same as on standard US keyboard." + nil t nil nil t nil nil nil nil nil t) + +(quail-define-rules + ("[[[[" ?\[) + ("[]" ?\]) + ("][" ?\[) + ("]]" ?\]) + ("[a" ?á) + ("[[a" ?ä) + ("[[[a" ?ä) + ("]a" ?ä) + ("][a" ?ä) + ("[c" ?č) + ("[[c" ?č) + ("]c" ?č) + ("[d" ?ď) + ("[[d" ?ď) + ("]d" ?ď) + ("[e" ?é) + ("[[e" ?ě) + ("]e" ?ě) + ("[i" ?í) + ("[l" ?ĺ) + ("[[l" ?ľ) + ("]l" ?ľ) + ("[n" ?ň) + ("[[n" ?ň) + ("]n" ?ň) + ("[[o" ?ô) + ("[[[o" ?ö) + ("[o" ?ó) + ("]o" ?ô) + ("][o" ?ö) + ("[r" ?ŕ) + ("[[r" ?ř) + ("]r" ?ř) + ("[s" ?š) + ("[[s" ?š) + ("[[[s" ?ß) + ("]s" ?š) + ("[t" ?ť) + ("[[t" ?ť) + ("]t" ?ť) + ("[u" ?ú) + ("[[u" ?ů) + ("[[[u" ?ü) + ("]u" ?ů) + ("][u" ?ü) + ("[y" ?ý) + ("[z" ?ž) + ("[[z" ?ž) + ("]z" ?ž) + ("[A" ?Á) + ("[[A" ?Ä) + ("[[[A" ?Ä) + ("]A" ?Ä) + ("][A" ?Ä) + ("[C" ?Č) + ("[[C" ?Č) + ("]C" ?Č) + ("[D" ?Ď) + ("[[D" ?Ď) + ("]D" ?Ď) + ("[E" ?É) + ("[[E" ?Ě) + ("]E" ?Ě) + ("[I" ?Í) + ("[L" ?Ĺ) + ("[[L" ?Ľ) + ("]L" ?Ľ) + ("[N" ?Ň) + ("[[N" ?Ň) + ("]N" ?Ň) + ("[O" ?Ó) + ("[[O" ?Ô) + ("[[[O" ?Ö) + ("]O" ?Ô) + ("][O" ?Ö) + ("[R" ?Ŕ) + ("[[R" ?Ř) + ("]R" ?Ř) + ("[S" ?Š) + ("[[S" ?Š) + ("[[[S" ?ß) + ("]S" ?Š) + ("[T" ?Ť) + ("[[T" ?Ť) + ("]T" ?Ť) + ("[U" ?Ú) + ("[[U" ?Ů) + ("[[[U" ?Ü) + ("]U" ?Ů) + ("][U" ?Ü) + ("[Y" ?Ý) + ("[Z" ?Ž) + ("[[Z" ?Ž) + ("]Z" ?Ž) + ([kp-1] ?1) + ([kp-2] ?2) + ([kp-3] ?3) + ([kp-4] ?4) + ([kp-5] ?5) + ([kp-6] ?6) + ([kp-7] ?7) + ([kp-8] ?8) + ([kp-9] ?9) + ([kp-0] ?0) + ([kp-add] ?+)) + +;;; slovak.el ends here |