Группа :: Редакторы
Пакет: emacs22
Главная Изменения Спек Патчи Загрузить Bugs and FR
Патч: leim-22.0.50-belarusian.patch
diff -Naur emacs.orig/leim/quail/cyrillic.el emacs/leim/quail/cyrillic.el
--- emacs.orig/leim/quail/cyrillic.el 2005-09-03 15:14:08 +0600
+++ emacs/leim/quail/cyrillic.el 2005-09-03 16:29:57 +0600
@@ -507,96 +507,160 @@
;; [`derived from JUS.I.K1' according to an old Mule note -- fx]
-;; (quail-define-package
-;; "cyrillic-beylorussian" "Belarussian" ",L6(BB" nil
-;; ",L)*5@B7(B-,L&.(B BEYLORUSSIAN (ISO 8859-5 encoding)"
-;; nil t t t t nil nil nil nil nil 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
-;; ("-" ?/)-;; ("=" ?+)-;; ("`" ?<)-;; ("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)-;; ("]" ?,Lv(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-beylorussian" "Belarussian" ",L6(BB" nil
+ ",L)*5@B7(B-,L&.(B BEYLORUSSIAN (ISO 8859-5 encoding)"
+ nil t t t t nil nil nil nil nil 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
+ ("-" ?/)+ ("=" ?+)+ ("`" ?<)+ ("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)+ ("]" ?,Lv(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-belarusian" "Cyrillic" ",L61(B" nil
+ ",L9FC:5=3(B Belarusian (CP1251 encoding)"
+ nil t t t t nil nil nil nil nil t)
+
+;; ,L!(B 1! 2" 3# 4; 5% 6: 7? 8* 9( 0) -_ += \|
+;; ,L9(B ,LF(B ,LC(B ,L:(B ,L5(B ,L=(B ,L3(B ,LH(B ,L.(B ,L7(B ,LE(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 ,L&(B ,LB(B ,LL(B ,L1(B ,LN(B ,.
+
+(quail-define-rules
+ ("`" ?,Lq(B) ("~" ?,L!(B)+ ("1" ?1) ("!" ?!) + ("2" ?2) ("@" ?\") + ("3" ?3) ("#" ?#) + ("4" ?4) ("$" ?\;) + ("5" ?5) ("%" ?%) + ("6" ?6) ("^" ?:) + ("7" ?7) ("&" ?&) + ("8" ?8) ("*" ?*) + ("9" ?9) ("(" ?\() + ("0" ?0) (")" ?\)) + ("-" ?-) ("_" ?_) + ("=" ?=) ("+" ?+) + ("\\" ?/) ("|" ?|) +
+ ("q" ?,LY(B) ("Q" ?,L9(B)+ ("w" ?,Lf(B) ("W" ?,LF(B)+ ("e" ?,Lc(B) ("E" ?,LC(B)+ ("r" ?,LZ(B) ("R" ?,L:(B)+ ("t" ?,LU(B) ("T" ?,L5(B)+ ("y" ?,L](B) ("Y" ?,L=(B)+ ("u" ?,LS(B) ("U" ?,L3(B)+ ("i" ?,Lh(B) ("I" ?,LH(B)+ ("o" ?,L~(B) ("O" ?,L.(B)+ ("p" ?,LW(B) ("P" ?,L7(B)+ ("[" ?,Le(B) ("{" ?,LE(B)+ ("]" ?') ("}" ?')+
+ ("a" ?,Ld(B) ("A" ?,LD(B)+ ("s" ?,Lk(B) ("S" ?,LK(B)+ ("d" ?,LR(B) ("D" ?,L2(B)+ ("f" ?,LP(B) ("F" ?,L0(B)+ ("g" ?,L_(B) ("G" ?,L?(B)+ ("h" ?,L`(B) ("H" ?,L@(B)+ ("j" ?,L^(B) ("J" ?,L>(B)+ ("k" ?,L[(B) ("K" ?,L;(B)+ ("l" ?,LT(B) ("L" ?,L4(B)+ (";" ?,LV(B) (":" ?,L6(B)+ ("'" ?,Lm(B) ("\"" ?,LM(B)+
+ ("z" ?,Lo(B) ("Z" ?,LO(B)+ ("x" ?,Lg(B) ("X" ?,LG(B)+ ("c" ?,La(B) ("C" ?,LA(B)+ ("v" ?,L\(B) ("V" ?,L<(B)+ ("b" ?,Lv(B) ("B" ?,L&(B)+ ("n" ?,Lb(B) ("N" ?,LB(B)+ ("m" ?,Ll(B) ("M" ?,LL(B)+ ("," ?,LQ(B) ("<" ?,L1(B)+ ("." ?,Ln(B) (">" ?,LN(B)+ ("/" ?.) ("?" ?,));;
