;; Maintainer: Milan Zamazal <pdm@fi.muni.cz>
;; Keywords: multilingual, input method, Czech
-;; Copying and warranty: GNU General Public License, version 2
+;; 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 2, 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; see the file COPYING. If not, write to the
+;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+;; Boston, MA 02111-1307, USA.
;;; Commentary:
;; "QWERTZ" and "QWERTY" versions)
;; - three non-standard Czech keyboards for programmers
-;; Current Quail version has some limitations, which create annoying problems
-;; when using Czech keyboards. You may want to install the file
-;; `hack-quail.el' from the package
-;; ftp://ftp.fi.muni.cz/pub/localization/emacs/emacs-20/emacs-cs-utils*
-;; which tries to remove some of these limitations.
-
;;; Code:
(require 'quail)
(quail-define-package
"czech" "Czech" "CZ" nil
"\"Standard\" Czech keyboard in the Windoze NT 105 keys version."
- nil t nil nil nil nil nil nil nil nil t)
+ nil t t t t nil nil nil nil nil t)
(quail-define-rules
("1" ?+)
("+8" ?*)
("+9" ?\()
("+0" ?\))
+ ("=<" ?<)
+ ("=>" ?>)
+ ("=[" ?\[)
+ ("=]" ?\])
+ ("={" ?{)
+ ("=}" ?})
([kp-1] ?1)
([kp-2] ?2)
([kp-3] ?3)
(quail-define-package
"czech-qwerty" "Czech" "CZ" nil
"\"Standard\" Czech keyboard in the Windoze NT 105 keys version, QWERTY layout."
- nil t nil nil nil nil nil nil nil nil t)
+ nil t nil nil t nil nil nil nil nil t)
(quail-define-rules
("1" ?+)
("+8" ?*)
("+9" ?\()
("+0" ?\))
+ ("=<" ?<)
+ ("=>" ?>)
+ ("=[" ?\[)
+ ("=]" ?\])
+ ("={" ?{)
+ ("=}" ?})
([kp-1] ?1)
([kp-2] ?2)
([kp-3] ?3)
`1' is replaced by `+'.
`+' is a dead key. Multiple presses of the dead key generate various accents.
All other keys are the same as on standard US keyboard."
- nil t nil nil nil nil nil nil nil nil t)
+ nil t nil nil t nil nil nil nil nil t)
(quail-define-rules
("1" ?+)
`1' is replaced by `\e,By\e(B'.
`+' is a dead key. Multiple presses of the dead key generate various accents.
All other keys are the same as on standard US keyboard."
- nil t nil nil nil nil nil nil nil nil t)
+ nil t nil nil t nil nil nil nil nil t)
(quail-define-rules
("1" ?\e,By\e(B)
There are two dead keys on `=' and `+'. Characters with diaresis are
accessible through `+='.
All other keys are the same as on standard US keyboard."
- nil t nil nil nil nil nil nil nil nil t)
+ nil t nil nil t nil nil nil nil nil t)
(quail-define-rules
("2" ?\e,Bl\e(B)