Initial revision

leim/Makefile.in

+# Makefile for leim subdirectory in GNU Emacs.
+# Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
+# Licensed to the Free Software Foundation.
+
+# 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.
+
+# Avoid trouble on systems where the `SHELL' variable might be
+# inherited from the environment.
+SHELL = /bin/sh
+
+# Here are the things that we expect ../configure to edit.
+version=@version@
+prefix=@prefix@
+datadir=@datadir@
+lispdir=@lispdir@
+srcdir=@srcdir@
+
+INSTALLDIR=${datadir}/emacs/${version}/leim
+
+EMACS=../src/emacs
+
+TAR=tar
+CP=cp
+
+SUBDIRS=quail skk
+
+CHINESE-GB=\
+	quail/tit/CTLau.elc \
+	quail/tit/CCDOSPY.elc \
+	quail/tit/Punct.elc \
+	quail/tit/PY.elc \
+	quail/tit/QJ.elc \
+	quail/tit/SW.elc \
+	quail/tit/TONEPY.elc \
+	quail/tit/ZIRANMA.elc
+CHINESE-BIG5=\
+	quail/tit/4Corner.elc \
+	quail/tit/ARRAY30.elc \
+	quail/tit/CTLauB.elc \
+	quail/tit/ECDICT.elc \
+	quail/tit/ETZY.elc \
+	quail/tit/Punct-b5.elc \
+	quail/tit/PY-b5.elc \
+	quail/tit/QJ-b5.elc \
+	quail/tit/ZOZY.elc \
+	quail/quick-b5.elc \
+	quail/tsangchi-b5.elc
+CHINESE-CNS=\
+	quail/quick-cns.elc \
+	quail/tsangchi-cns.elc
+
+JAPANESE=quail/japanese.elc skk/skkdic.elc
+
+KOREAN=\
+	quail/hangul.elc \
+	quail/hangul3.elc \
+	quail/hanja.elc \
+	quail/hanja-jis.elc \
+	quail/symbol-ksc.elc
+
+THAI=quail/thai.elc
+
+VIETNAMESE=quail/viqr.elc
+
+LAO=quail/lao.elc quail/lrt.elc
+
+INDIAN=quail/devanagari.elc
+
+TIBETAN=quail/tibetan.elc
+
+LATIN=quail/latin-pre.elc quail/latin-post.elc
+
+GREEK=quail/greek.elc
+
+RUSSIAN=quail/cyrillic.elc
+
+MISC=quail/ethiopic.elc quail/ipa.elc
+
+CHINESE=${CHINESE-GB} ${CHINESE-BIG5} ${CHINESE-CNS}
+EASTASIA=${CHINESE} ${JAPANESE} ${KOREAN}
+ASIA=${EASTASIA} ${THAI} ${VIETNAMESE} ${LAO} ${INDIAN}
+EUROPEAN=${LATIN} ${GREEK} ${RUSSIAN}
+WORLD=${ASIA} ${EUROPEAN} ${MISC}
+
+all: ${SUBDIRS} ${WORLD} leim-list.el
+
+quail:
+	mkdir quail
+	ln -s . quail/tit
+	ln -s ${srcdir}/quail/*.el quail
+
+skk:
+	mkdir skk
+	ln -s ${srcdir}/skk/* skk
+
+quail/tit/%.el: ${srcdir}/CXTERM-DIC/%.tit
+	$(EMACS) -batch -l titdic-cnv -f batch-titdic-convert\
+		-dir quail `dirname $<`
+
+quail/tit/%.elc: quail/tit/%.el
+	$(EMACS) -batch --eval '(byte-recompile-directory "quail" 0)'
+
+quail/%.el:
+	for f in ${srcdir}/quail/*.el; do \
+	  [ -f quail/`basename $$f` ] || (cd quail; ln -s $$f .); \
+	done
+
+quail/%.elc: quail/%.el
+	$(EMACS) -batch --eval '(byte-recompile-directory "quail" 0)'
+
+skk/%.el:
+	ln -s ${srcdir}/$@ $@
+
+skk/%.elc: skk/%.el
+	$(EMACS) -batch -l skkdic-cnv -f batch-byte-compile $<
+
+leim-list.el: ${WORLD}
+	$(EMACS) -batch --eval "(update-leim-list-file \".\")"
+
+# install -- all languages supported by LEIM
+#   install-asia -- all Asian languages
+#     install-eastasia -- all Each Asian languages
+#       install-chinese -- all Chinese Languages
+#         install-chinese-gb -- Chinese (GB)
+#         install-chinese-big5 -- Chinese (BIG5)
+#         install-chinese-cns -- Chinese (CNS)
+#       install-japanese -- Japanese
+#       install-korean -- Korean (hangul and hanja)
+#     install-thai -- Thai
+#     install-vietnamese -- Vietnamese
+#     install-lao -- Lao
+#     install-indian -- Indian (Devanagari script)
+#     install-tibetan -- Tibetan (Devanagari)
+#   install-european -- all European languages
+#     install-latin -- all Latin scripts
+#     install-greek -- Greek
+#     install-russian -- Russian (cyrillic)
+#   install-misc -- Ethiopic and IPA
+
+install: all
+	ELC=`echo ${WORLD} | sed 's,tit/,,g'`; \
+	EL=`echo $$ELC | sed 's/\.elc/.el/g'`; \
+	$(TAR) -cf - $$EL $$ELC | (cd ${INSTALLDIR}; $(TAR) -xvf -)
+	$(EMACS) -batch --eval "(update-leim-list-file \"${INSTALLDIR}\")"
+
+install-asia: ${ASIA}
+	ELSRC=`echo ${ASIA} | sed 's/\.elc/.el/g'`; \
+	$(TAR) -cf - $$ELSRC ${ASIA} | (cd ${INSTALLDIR}; $(TAR) -xvf -)
+	$(EMACS) -batch --eval "(update-leim-list-file \"${INSTALLDIR}\")"
+
+install-eastasia: ${EASTASIA}
+	ELSRC=`echo ${EASTASIA} | sed 's/\.elc/.el/g'`; \
+	$(TAR) -cf - $$ELSRC ${EASTASIA} | (cd ${INSTALLDIR}; $(TAR) -xvf -)
+	$(EMACS) -batch --eval "(update-leim-list-file \"${INSTALLDIR}\")"
+
+install-chinese: install-chinese-gb install-chinese-big5 install-chinese-cns
+
+install-chinese-gb: ${CHINESE-GB}
+	ELSRC=`echo $^ | sed 's/\.elc/.el/g'`; \
+	  $(CP) -fp $$ELSRC $^ ${INSTALLDIR}/quail
+	$(EMACS) -batch --eval "(update-leim-list-file \"${INSTALLDIR}\")"
+
+install-chinese-big5: ${CHINESE-BIG5}
+	ELSRC=`echo $^ | sed 's/\.elc/.el/g'`; \
+	  $(CP) -fp $$ELSRC $^ ${INSTALLDIR}/quail
+	$(EMACS) -batch --eval "(update-leim-list-file \"${INSTALLDIR}\")"
+
+install-chinese-cns: ${CHINESE-CNS}
+	ELSRC=`echo ${CHINESE-CNS} | sed 's/\.elc/.el/g'`; \
+	$(TAR) cf - $$ELSRC ${CHINESE-CNS} | (cd ${INSTALLDIR}; $(TAR) xfBp -)
+
+install-japanese: ${JAPANESE}
+	ELSRC=`echo ${JAPANESE} | sed 's/\.elc/.el/g'`; \
+	$(TAR) cf - $$ELSRC ${JAPANESE} | (cd ${INSTALLDIR}; $(TAR) xfBp -)
+
+install-korean: ${KOREAN}
+	ELSRC=`echo ${KOREAN} | sed 's/\.elc/.el/g'`; \
+	$(TAR) cf - $$ELSRC ${KOREAN} | (cd ${INSTALLDIR}; $(TAR) xfBp -)
+
+install-thai: ${THAI}
+	ELSRC=`echo ${THAI} | sed 's/\.elc/.el/g'`; \
+	$(TAR) cf - $$ELSRC ${THAI} | (cd ${INSTALLDIR}; $(TAR) xfBp -)
+
+install-vietnamese: ${VIETNAMESE}
+	ELSRC=`echo ${VIETNAMESE} | sed 's/\.elc/.el/g'`; \
+	$(TAR) cf - $$ELSRC ${VIETNAMESE} | (cd ${INSTALLDIR}; $(TAR) xfBp -)
+
+install-lao: ${LAO}
+	ELSRC=`echo ${LAO} | sed 's/\.elc/.el/g'`; \
+	$(TAR) cf - $$ELSRC ${LAO} | (cd ${INSTALLDIR}; $(TAR) xfBp -)
+
+install-indian: ${INSTALLDIR} ${INDIAN}
+	ELSRC=`echo ${INDIAN} | sed 's/\.elc/.el/g'`; \
+	$(TAR) cf - $$ELSRC ${INDIAN} | (cd ${INSTALLDIR}; $(TAR) xfBp -)
+
+install-tibetan: ${INSTALLDIR} ${TIBETAN}
+	ELSRC=`echo ${INDIAN} | sed 's/\.elc/.el/g'`; \
+	$(TAR) cf - $$ELSRC ${INDIAN} | (cd ${INSTALLDIR}; $(TAR) xfBp -)
+
+install-european: install-latin install-greek install-russian
+
+install-latin: ${LATIN}
+	ELSRC=`echo ${LATIN} | sed 's/\.elc/.el/g'`; \
+	$(TAR) cf - $$ELSRC ${LATIN} | (cd ${INSTALLDIR}; $(TAR) xfBp -)
+
+install-greek: ${GREEK}
+	ELSRC=`echo ${GREEK} | sed 's/\.elc/.el/g'`; \
+	$(TAR) cf - $$ELSRC ${GREEK} | (cd ${INSTALLDIR}; $(TAR) xfBp -)
+
+install-russian: ${RUSSIAN}
+	ELSRC=`echo ${RUSSIAN} | sed 's/\.elc/.el/g'`; \
+	$(TAR) cf - $$ELSRC ${RUSSIAN} | (cd ${INSTALLDIR}; $(TAR) xfBp -)
+
+install-misc: ${MISC}
+	ELSRC=`echo $^ | sed 's/\.elc/.el/g'`; \
+	  $(CP) -fp $$ELSRC $^ ${INSTALLDIR}/quail
+	$(EMACS) -batch --eval "(update-leim-list-file \"${INSTALLDIR}\")"

leim/quail/cyrillic.el

+;;; quail/cyrillic.el -- Quail package for inputting Cyrillic characters
+
+;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
+;; Licensed to the Free Software Foundation.
+
+;; Keywords: multilingual, input method, Cyrillic
+
+;; 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.
+
+;;; Code:
+
+(require 'quail)
+
+(quail-define-package
+ "cyrillic-jcuken" "Cyrillic" ",L69(B" nil
+ ",L9FC:5=(B keyboard layout widely used in Russia (ISO 8859-5 encoding)"
+ nil t t t t)
+
+;;  1! 2@ 3# 4" 5: 6, 7. 8* 9( 0) -_ =+ ,L!(B
+;;   ,L9(B  ,LF(B  ,LC(B  ,L:(B  ,L5(B  ,L=(B  ,L3(B  ,LH(B  ,LI(B  ,L7(B  ,LE(B  ,Lj(B
+;;    ,LD(B  ,LK(B  ,L2(B  ,L0(B  ,L?(B  ,L@(B  ,L>(B  ,L;(B  ,L4(B ,L6(B  ,LM(B
+;;     ,LO(B  ,LG(B  ,LA(B  ,L<(B  ,L8(B  ,LB(B  ,LL(B  ,L1(B  ,LN(B  /?
+
+(quail-define-rules
+ ("1" ?1)
+ ("2" ?2)
+ ("3" ?3)
+ ("4" ?4)
+ ("5" ?5)
+ ("6" ?6)
+ ("7" ?7)
+ ("8" ?8)
+ ("9" ?9)
+ ("0" ?0)
+ ("-" ?-)
+ ("=" ?=)
+ ("`" ?,Lq(B)
+ ("q" ?,LY(B)
+ ("w" ?,Lf(B)
+ ("e" ?,Lc(B)
+ ("r" ?,LZ(B)
+ ("t" ?,LU(B)
+ ("y" ?,L](B)
+ ("u" ?,LS(B)
+ ("i" ?,Lh(B)
+ ("o" ?,Li(B)
+ ("p" ?,LW(B)
+ ("[" ?,Le(B)
+ ("]" ?,Lj(B)
+ ("a" ?,Ld(B)
+ ("s" ?,Lk(B)
+ ("d" ?,LR(B)
+ ("f" ?,LP(B)
+ ("g" ?,L_(B)
+ ("h" ?,L`(B)
+ ("j" ?,L^(B)
+ ("k" ?,L[(B)
+ ("l" ?,LT(B)
+ (";" ?,LV(B)
+ ("'" ?,Lm(B)
+ ("\\" ?\\)
+ ("z" ?,Lo(B)
+ ("x" ?,Lg(B)
+ ("c" ?,La(B)
+ ("v" ?,L\(B)
+ ("b" ?,LX(B)
+ ("n" ?,Lb(B)
+ ("m" ?,Ll(B)
+ ("," ?,LQ(B)
+ ("." ?,Ln(B)
+ ("/" ?/)
+ 
+ ("!" ?!)
+ ("@" ?@)
+ ("#" ?#)
+ ("$" ?\")
+ ("%" ?:)
+ ("^" ?,)
+ ("&" ?.)
+ ("*" ?*)
+ ("(" ?()
+  (")" ?))
+ ("_" ?_)
+ ("+" ?+)
+ ("~" ?,L!(B)
+ ("Q" ?,L9(B)
+ ("W" ?,LF(B)
+ ("E" ?,LC(B)
+ ("R" ?,L:(B)
+ ("T" ?,L5(B)
+ ("Y" ?,L=(B)
+ ("U" ?,L3(B)
+ ("I" ?,LH(B)
+ ("O" ?,LI(B)
+ ("P" ?,L7(B)
+ ("{" ?,LE(B)
+ ("}" ?,LJ(B)
+ ("A" ?,LD(B)
+ ("S" ?,LK(B)
+ ("D" ?,L2(B)
+ ("F" ?,L0(B)
+ ("G" ?,L?(B)
+ ("H" ?,L@(B)
+ ("J" ?,L>(B)
+ ("K" ?,L;(B)
+ ("L" ?,L4(B)
+ (":" ?,L6(B)
+ ("\"" ?,LM(B)
+ ("|" ?|)
+ ("Z" ?,LO(B)
+ ("X" ?,LG(B)
+ ("C" ?,LA(B)
+ ("V" ?,L<(B)
+ ("B" ?,L8(B)
+ ("N" ?,LB(B)
+ ("M" ?,LL(B)
+ ("<" ?,L1(B)
+ (">" ?,LN(B)
+ ("?" ??))
+
+;;
+
+(quail-define-package
+ "cyrillic-jis-russian" "Cyrillic" "$B'('+(B" nil
+ "$B'+'8'5','&'/(B keyboard layout same as JCUKEN (JIS X0208.1983 encoding)"
+		      nil t t t t)
+
+;;  1! 2@ 3# 4" 5: 6, 7. 8* 9( 0) -_ =+ ,L!(B
+;;   ,L9(B  ,LF(B  ,LC(B  ,L:(B  ,L5(B  ,L=(B  ,L3(B  ,LH(B  ,LI(B  ,L7(B  ,LE(B  ,Lj(B
+;;    ,LD(B  ,LK(B  ,L2(B  ,L0(B  ,L?(B  ,L@(B  ,L>(B  ,L;(B  ,L4(B  ,L6(B  ,LM(B
+;;     ,LO(B  ,LG(B  ,LA(B  ,L<(B  ,L8(B  ,LB(B  ,LL(B  ,L1(B  ,LN(B  /?
+
+(quail-define-rules
+ ("1" ?$B#1(B)
+ ("2" ?$B#2(B)
+ ("3" ?$B#3(B)
+ ("4" ?$B#4(B)
+ ("5" ?$B#5(B)
+ ("6" ?$B#6(B)
+ ("7" ?$B#7(B)
+ ("8" ?$B#8(B)
+ ("9" ?$B#9(B)
+ ("0" ?$B#0(B)
+ ("-" ?$B!](B)
+ ("=" ?$B!a(B)
+ ("`" ?$B'W(B)
+ ("q" ?$B'[(B)
+ ("w" ?$B'h(B)
+ ("e" ?$B'e(B)
+ ("r" ?$B'\(B)
+ ("t" ?$B'V(B)
+ ("y" ?$B'_(B)
+ ("u" ?$B'T(B)
+ ("i" ?$B'j(B)
+ ("o" ?$B'k(B)
+ ("p" ?$B'Y(B)
+ ("[" ?$B'g(B)
+ ("]" ?$B'l(B)
+ ("a" ?$B'f(B)
+ ("s" ?$B'm(B)
+ ("d" ?$B'S(B)
+ ("f" ?$B'Q(B)
+ ("g" ?$B'a(B)
+ ("h" ?$B'b(B)
+ ("j" ?$B'`(B)
+ ("k" ?$B'](B)
+ ("l" ?$B'U(B)
+ (";" ?$B'X(B)
+ ("'" ?$B'o(B)
+ ("\\" ?$B!@(B)
+ ("z" ?$B'q(B)
+ ("x" ?$B'i(B)
+ ("c" ?$B'c(B)
+ ("v" ?$B'^(B)
+ ("b" ?$B'Z(B)
+ ("n" ?$B'd(B)
+ ("m" ?$B'n(B)
+ ("," ?$B'R(B)
+ ("." ?$B'p(B)
+ ("/" ?$B!?(B)
+ 
+ ("!" ?$B!*(B)
+ ("@" ?$B!w(B)
+ ("#" ?$B!t(B)
+ ("$" ?$B!I(B)
+ ("%" ?$B!'(B)
+ ("^" ?$B!$(B)
+ ("&" ?$B!%(B)
+ ("*" ?$B!v(B)
+ ("(" ?$B!J(B)
+  (")" ?$B!K(B)
+ ("_" ?$B!2(B)
+ ("+" ?$B!\(B)
+ ("~" ?$B''(B)
+ ("Q" ?$B'+(B)
+ ("W" ?$B'8(B)
+ ("E" ?$B'5(B)
+ ("R" ?$B',(B)
+ ("T" ?$B'&(B)
+ ("Y" ?$B'/(B)
+ ("U" ?$B'$(B)
+ ("I" ?$B':(B)
+ ("O" ?$B';(B)
+ ("P" ?$B')(B)
+ ("{" ?$B'7(B)
+ ("}" ?$B'<(B)
+ ("A" ?$B'6(B)
+ ("S" ?$B'=(B)
+ ("D" ?$B'#(B)
+ ("F" ?$B'!(B)
+ ("G" ?$B'1(B)
+ ("H" ?$B'2(B)
+ ("J" ?$B'0(B)
+ ("K" ?$B'-(B)
+ ("L" ?$B'%(B)
+ (":" ?$B'((B)
+ ("\"" ?$B'?(B)
+ ("|" ?$B!C(B)
+ ("Z" ?$B'A(B)
+ ("X" ?$B'9(B)
+ ("C" ?$B'3(B)
+ ("V" ?$B'.(B)
+ ("B" ?$B'*(B)
+ ("N" ?$B'4(B)
+ ("M" ?$B'>(B)
+ ("<" ?$B'"(B)
+ (">" ?$B'@(B)
+ ("?" ?$B!)(B))
+
+;;
+
+(quail-define-package
+ "cyrillic-macedonian" "Cyrillic" ",L6(BM" nil
+ ",L)*5@B7(B-,L#,(B keyboard layout based on JUS.I.K1.004 (ISO 8859-5 encoding)"
+ nil t t t t)
+
+;;  1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <>
+;;   ,L)(B  ,L*(B  ,L5(B  ,L@(B  ,LB(B  ,L7(B  ,LC(B  ,L8(B  ,L>(B  ,L?(B  ,LH(B  ,L#(B
+;;    ,L0(B  ,LA(B  ,L4(B  ,LD(B  ,L3(B  ,LE(B  ,L((B  ,L:(B  ,L;(B  ,LG(B  ,L,(B  ,L6(B
+;;     ,L%(B  ,L/(B  ,LF(B  ,L2(B  ,L1(B  ,L=(B  ,L<(B  ,; .: -_
+
+(quail-define-rules
+ ("1" ?1)
+ ("2" ?2)
+ ("3" ?3)
+ ("4" ?4)
+ ("5" ?5)
+ ("6" ?6)
+ ("7" ?7)
+ ("8" ?8)
+ ("9" ?9)
+ ("0" ?0)
+ ("-" ?/)
+ ("=" ?+)
+ ("`" ?<)
+ ("q" ?,Ly(B)
+ ("w" ?,Lz(B)
+ ("e" ?,LU(B)
+ ("r" ?,L`(B)
+ ("t" ?,Lb(B)
+ ("y" ?,LW(B)
+ ("u" ?,Lc(B)
+ ("i" ?,LX(B)
+ ("o" ?,L^(B)
+ ("p" ?,L_(B)
+ ("[" ?,Lh(B)
+ ("]" ?,Ls(B)
+ ("a" ?,LP(B)
+ ("s" ?,La(B)
+ ("d" ?,LT(B)
+ ("f" ?,Ld(B)
+ ("g" ?,LS(B)
+ ("h" ?,Le(B)
+ ("j" ?,Lx(B)
+ ("k" ?,LZ(B)
+ ("l" ?,L[(B)
+ (";" ?,Lg(B)
+ ("'" ?,L|(B)
+ ("\\" ?,LV(B)
+ ("z" ?,Lu(B)
+ ("x" ?,L(B)
+ ("c" ?,Lf(B)
+ ("v" ?,LR(B)
+ ("b" ?,LQ(B)
+ ("n" ?,L](B)
+ ("m" ?,L\(B)
+ ("," ?,)
+ ("." ?.)
+ ("/" ?-)
+ 
+ ("!" ?!)
+ ("@" ?\")
+ ("#" ?#)
+ ("$" ?$)
+ ("%" ?%)
+ ("^" ?&)
+ ("&" ?')
+ ("*" ?\()
+ ("(" ?\))
+ (")" ?=)
+ ("_" ??)
+ ("+" ?*)
+ ("~" ?>)
+ ("Q" ?,L)(B)
+ ("W" ?,L*(B)
+ ("E" ?,L5(B)
+ ("R" ?,L@(B)
+ ("T" ?,LB(B)
+ ("Y" ?,L7(B)
+ ("U" ?,LC(B)
+ ("I" ?,L8(B)
+ ("O" ?,L>(B)
+ ("P" ?,L?(B)
+ ("{" ?,LH(B)
+ ("}" ?,L#(B)
+ ("A" ?,L0(B)
+ ("S" ?,LA(B)
+ ("D" ?,L4(B)
+ ("F" ?,LD(B)
+ ("G" ?,L3(B)
+ ("H" ?,LE(B)
+ ("J" ?,L((B)
+ ("K" ?,L:(B)
+ ("L" ?,L;(B)
+ (":" ?,LG(B)
+ ("\"" ?,L,(B)
+ ("|" ?,L6(B)
+ ("Z" ?,L%(B)
+ ("X" ?,L/(B)
+ ("C" ?,LF(B)
+ ("V" ?,L2(B)
+ ("B" ?,L1(B)
+ ("N" ?,L=(B)
+ ("M" ?,L<(B)
+ ("<" ?\;)
+ (">" ?:)
+ ("?" ?_))
+
+;;
+
+(quail-define-package
+ "cyrillic-serbian" "Cyrillic" ",L6(BS" nil
+ ",L)*5@B7(B-,L"+(B keyboard layout based on JUS.I.K1.005 (ISO 8859-5 encoding)"
+		      nil t t t t)
+
+;;  1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <>
+;;   ,L)(B  ,L*(B  ,L5(B  ,L@(B  ,LB(B  ,L7(B  ,LC(B  ,L8(B  ,L>(B  ,L?(B  ,LH(B  ,L"(B
+;;    ,L0(B  ,LA(B  ,L4(B  ,LD(B  ,L3(B  ,LE(B  ,L((B  ,L:(B  ,L;(B  ,LG(B  ,L+(B  ,L6(B
+;;     ,L%(B  ,L/(B  ,LF(B  ,L2(B  ,L1(B  ,L=(B  ,L<(B  ,; .: -_
+
+(quail-define-rules
+ ("1" ?1)
+ ("2" ?2)
+ ("3" ?3)
+ ("4" ?4)
+ ("5" ?5)
+ ("6" ?6)
+ ("7" ?7)
+ ("8" ?8)
+ ("9" ?9)
+ ("0" ?0)
+ ("-" ?/)
+ ("=" ?+)
+ ("`" ?<)
+ ("q" ?,Ly(B)
+ ("w" ?,Lz(B)
+ ("e" ?,LU(B)
+ ("r" ?,L`(B)
+ ("t" ?,Lb(B)
+ ("y" ?,LW(B)
+ ("u" ?,Lc(B)
+ ("i" ?,LX(B)
+ ("o" ?,L^(B)
+ ("p" ?,L_(B)
+ ("[" ?,Lh(B)
+ ("]" ?,Lr(B)