]> code.delx.au - gnu-emacs/blobdiff - leim/quail/latin-post.el
*** empty log message ***
[gnu-emacs] / leim / quail / latin-post.el
index 6cfd0203ff42dcf2043435d512dad7456d104a28..7859d11f28dedbc11e93890896d9b05695e47662 100644 (file)
@@ -1,8 +1,11 @@
 ;;; latin-post.el --- Quail packages for inputting various European characters  -*-coding: utf-8;-*-
 
 ;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
-;; Licensed to the Free Software Foundation.
-;; Copyright (C) 2002 Free Software Foundation, Inc.
+;;   Licensed to the Free Software Foundation.
+;; Copyright (C) 2001, 2002 Free Software Foundation.
+;; Copyright (C) 2003
+;;   National Institute of Advanced Industrial Science and Technology (AIST)
+;;   Registration Number H13PRO009
 
 ;; Keywords: multilingual, input method, latin, i18n
 
@@ -2067,10 +2070,11 @@ Dead accent is right to æ." nil t t t t nil nil nil nil nil t)
  ("?" ?Z)
  )
 
-
 (quail-define-package
  "latin-postfix" "Latin" "L<" t
- "Latin character input method with postfix modifiers
+ "Latin character input method with postfix modifiers.
+This is the union of various input methods originally made for input
+of characters from a single Latin-N charset.
 
              | postfix | examples
  ------------+---------+----------
@@ -2459,4 +2463,23 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("z~~" ["z~"])
  )
 
+;; Derived from Slovenian.kmap from Yudit
+;; attributed as: 2001-11-11 Roman Maurer <roman.maurer@amis.net>
+(quail-define-package
+ "slovenian" "Slovenian" "Sl" t
+ "Slovenian postfix input."
+ nil t t t nil nil nil nil nil nil t)
+
+(quail-define-rules
+ ("C<" ?Č)
+ ("C'" ?Ć)
+ ("D;" ?Đ)
+ ("S<" ?Š)
+ ("Z<" ?Ž)
+ ("c<" ?č)
+ ("c'" ?ć)
+ ("d;" ?đ)
+ ("s<" ?š)
+ ("z<" ?ž))
+
 ;;; latin-post.el ends here