From 40d2f61c71cb928f424093be4c1464f49c48f079 Mon Sep 17 00:00:00 2001
From: ntakahas <ntakahas>
Date: Thu, 18 Mar 2004 08:38:08 +0000
Subject: [PATCH] A new input method for Croatian.

---
 hr-kbd.mim |   78 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 78 insertions(+)
 create mode 100644 hr-kbd.mim

diff --git a/hr-kbd.mim b/hr-kbd.mim
new file mode 100644
index 0000000..9b9a42a
--- /dev/null
+++ b/hr-kbd.mim
@@ -0,0 +1,78 @@
+;; hr-kdb.mim -- Croatian input method with Croatian keyboard layout
+;; Copyright (C) 2004
+;;   National Institute of Advanced Industrial Science and Technology (AIST)
+;;   Registration Number H15PRO112
+
+;; This file is part of the m17n database; a sub-part of the m17n
+;; library.
+
+;; The m17n library is free software; you can redistribute it and/or
+;; modify it under the terms of the GNU Lesser General Public License
+;; as published by the Free Software Foundation; either version 2.1 of
+;; the License, or (at your option) any later version.
+
+;; The m17n library 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
+;; Lesser General Public License for more details.
+
+;; You should have received a copy of the GNU Lesser General Public
+;; License along with the m17n library; if not, write to the Free
+;; Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
+;; 02111-1307, USA.
+
+;;; <li> hr-kdb.mim
+;;;
+;;; Input method for Croatian.
+;;; Simulating Croatian Latin keyboard on American keyboard.
+;;;
+;;; @verbatim
+;;; 1!  2"  3#  4$  5%  6&  7/  8(  9)  0=  '?  +*  ¸¨
+;;;   qQ  wW  rR  eE  tT  zZ  uU  iI  oO  pP  šŠ  đĐ
+;;;     aA  sS  dD  fF  gG  hH  jJ  kK  lL  čČ  ćĆ  žŽ
+;;;       yY  xX  cC  vV  bB  nN  mM  ,;  .:  -_
+;;; @endverbatim
+
+(title "HR")
+
+(map
+ (map
+		("@" ?\")
+		("^" ?&)
+		("&" ?/)
+		("*" ?\()
+		("\(" ?\))
+		("\)" ?=)
+  ("-" ?')	("_" ??)
+  ("=" ?+)	("+" ?*)
+  ("`" ?¸)	("~" ?¨)
+
+  ("y" ?z)	("Y" ?Z)
+  ("[" ?Å¡)	("{" ?Å )
+  ("]" ?đ)	("}" ?Đ)
+
+  (";" ?č)	(":" ?Č)
+  ("'" ?ć)	("\"" ?Ć)
+  ("\\" ?ž)	("|" ?Ž)
+
+  ("z" ?y)	("Z" ?Y)
+		("<" ?;)
+		(">" ?:)
+  ("/" ?-)	("?" ?_)
+
+  ("`c" ?ç)	("`C" ?Ç)
+  ("`s" ?ş)	("`S" ?Ş)
+  ("~a" ?ä)	("~A" ?Ä)
+  ("~e" ?ë)	("~E" ?Ë)
+  ("~o" ?ö)	("~O" ?Ö)
+  ("~u" ?ü)	("~U" ?Ü)
+  ))
+
+(state
+ (init
+  (map)))
+
+;; Local Variables:
+;; coding: utf-8
+;; mode: lisp
+;; End:
-- 
1.7.10.4