[Emacs-diffs] Changes to emacs/lisp/language/tibetan.el

[Miles Bader]

Index: emacs/lisp/language/tibetan.el
diff -c emacs/lisp/language/tibetan.el:1.19 emacs/lisp/language/tibetan.el:1.20
*** emacs/lisp/language/tibetan.el:1.19 Tue Apr 30 13:23:53 2002
--- emacs/lisp/language/tibetan.el      Tue Feb  4 08:11:50 2003
***************
*** 27,33 ****
  ;; Created: Feb. 17. 1997
  
  ;; History:
! ;; 1997.03.13 Modification for special signs and punctuations. 
  
  ;;; Commentary:
  
--- 27,33 ----
  ;; Created: Feb. 17. 1997
  
  ;; History:
! ;; 1997.03.13 Modification for special signs and punctuations.
  
  ;;; Commentary:
  
***************
*** 55,61 ****
  ;;;2260 $(7"`(B $(7"a(B $(7"b(B $(7"c(B $(7"d(B $(7"e(B $(7"f(B 
$(7"g(B $(7"h(B $(7"i(B $(7"j(B $(7"k(B $(7"l(B $(7"m(B $(7"n(B 
$(7"o(B ; Long vowels and
  ;;;2270 $(7"p(B $(7"q(B $(7"r(B $(7"s(B $(7"t(B $(7"u(B $(7"v(B 
$(7"w(B $(7"x(B $(7"y(B $(7"z(B $(7"{(B $(7"|(B $(7"}(B $(7"~(B 
// ; vocalic r, l ARE
  ;;;                                                     ; atomically
! ;;;                                                     ; encoded. 
  ;;;     00 01 02 03 04 05 06 07 08 09 0A 0B 0C 0D 0E 0F
  ;;;2320 // $(7#!(B $(7#"(B $(7##(B $(7#$(B $(7#%(B $(7#&(B 
$(7#'(B $(7#((B $(7#)(B $(7#*(B $(7#+(B $(7#,(B $(7#-(B $(7#.(B 
$(7#/(B ; Subjoined consonants
  ;;;2330 $(7#0(B $(7#1(B $(7#2(B $(7#3(B $(7#4(B $(7#5(B $(7#6(B 
$(7#7(B $(7#8(B $(7#9(B $(7#:(B $(7#;(B $(7#<(B $(7#=(B $(7#>(B 
$(7#?(B ;
--- 55,61 ----
  ;;;2260 $(7"`(B $(7"a(B $(7"b(B $(7"c(B $(7"d(B $(7"e(B $(7"f(B 
$(7"g(B $(7"h(B $(7"i(B $(7"j(B $(7"k(B $(7"l(B $(7"m(B $(7"n(B 
$(7"o(B ; Long vowels and
  ;;;2270 $(7"p(B $(7"q(B $(7"r(B $(7"s(B $(7"t(B $(7"u(B $(7"v(B 
$(7"w(B $(7"x(B $(7"y(B $(7"z(B $(7"{(B $(7"|(B $(7"}(B $(7"~(B 
// ; vocalic r, l ARE
  ;;;                                                     ; atomically
! ;;;                                                     ; encoded.
  ;;;     00 01 02 03 04 05 06 07 08 09 0A 0B 0C 0D 0E 0F
  ;;;2320 // $(7#!(B $(7#"(B $(7##(B $(7#$(B $(7#%(B $(7#&(B 
$(7#'(B $(7#((B $(7#)(B $(7#*(B $(7#+(B $(7#,(B $(7#-(B $(7#.(B 
$(7#/(B ; Subjoined consonants
  ;;;2330 $(7#0(B $(7#1(B $(7#2(B $(7#3(B $(7#4(B $(7#5(B $(7#6(B 
$(7#7(B $(7#8(B $(7#9(B $(7#:(B $(7#;(B $(7#<(B $(7#=(B $(7#>(B 
$(7#?(B ;
***************
*** 69,75 ****
  ;;;2430 $(7$0(B $(7$1(B $(7$2(B $(7$3(B $(7$4(B $(7$5(B $(7$6(B 
$(7$7(B $(7$8(B $(7$9(B $(7$:(B $(7$;(B $(7$<(B $(7$=(B $(7$>(B 
$(7$?(B ; consonants for
  ;;;2440 $(address@hidden(B $(7$A(B $(7$B(B $(7$C(B $(7$D(B $(7$E(B 
$(7$F(B $(7$G(B $(7$H(B $(7$I(B $(7$J(B $(7$K(B $(7$L(B $(7$M(B 
$(7$N(B $(7$O(B ; ordinary Tibetan.
  ;;;2450 $(7$P(B $(7$Q(B $(7$R(B $(7$S(B $(7$T(B $(7$U(B $(7$V(B 
$(7$W(B $(7$X(B $(7$Y(B $(7$Z(B $(7$[(B $(7$\(B $(7$](B $(7$^(B 
$(7$_(B ; They are decomposed
! ;;;2460 $(7$`(B $(7$a(B $(7$b(B $(7$c(B $(7$d(B $(7$e(B $(7$f(B 
$(7$g(B $(7$h(B $(7$i(B $(7$j(B $(7$k(B $(7$l(B $(7$m(B $(7$n(B 
$(7$o(B ; into base and 
  ;;;2470 $(7$p(B $(7$q(B $(7$r(B $(7$s(B $(7$t(B $(7$u(B $(7$v(B 
$(7$w(B $(7$x(B $(7$y(B $(7$z(B $(7${(B $(7$|(B $(7$}(B $(7$~(B 
// ; subjoined consonants
  ;;;                                                     ; when written on a
  ;;;     00 01 02 03 04 05 06 07 08 09 0A 0B 0C 0D 0E 0F ; file in Tibetan
--- 69,75 ----
  ;;;2430 $(7$0(B $(7$1(B $(7$2(B $(7$3(B $(7$4(B $(7$5(B $(7$6(B 
$(7$7(B $(7$8(B $(7$9(B $(7$:(B $(7$;(B $(7$<(B $(7$=(B $(7$>(B 
$(7$?(B ; consonants for
  ;;;2440 $(address@hidden(B $(7$A(B $(7$B(B $(7$C(B $(7$D(B $(7$E(B 
$(7$F(B $(7$G(B $(7$H(B $(7$I(B $(7$J(B $(7$K(B $(7$L(B $(7$M(B 
$(7$N(B $(7$O(B ; ordinary Tibetan.
  ;;;2450 $(7$P(B $(7$Q(B $(7$R(B $(7$S(B $(7$T(B $(7$U(B $(7$V(B 
$(7$W(B $(7$X(B $(7$Y(B $(7$Z(B $(7$[(B $(7$\(B $(7$](B $(7$^(B 
$(7$_(B ; They are decomposed
! ;;;2460 $(7$`(B $(7$a(B $(7$b(B $(7$c(B $(7$d(B $(7$e(B $(7$f(B 
$(7$g(B $(7$h(B $(7$i(B $(7$j(B $(7$k(B $(7$l(B $(7$m(B $(7$n(B 
$(7$o(B ; into base and
  ;;;2470 $(7$p(B $(7$q(B $(7$r(B $(7$s(B $(7$t(B $(7$u(B $(7$v(B 
$(7$w(B $(7$x(B $(7$y(B $(7$z(B $(7${(B $(7$|(B $(7$}(B $(7$~(B 
// ; subjoined consonants
  ;;;                                                     ; when written on a
  ;;;     00 01 02 03 04 05 06 07 08 09 0A 0B 0C 0D 0E 0F ; file in Tibetan
***************
*** 100,106 ****
             (input-method . "tibetan-wylie")
             (features tibet-util)
             (documentation . t)
!            (sample-text 
              . (tibetan-compose-string
                 (copy-sequence
  "Tibetan (4$(7"7r'"]0"7"]14"20"21!;4%P0"G#!"Q14"20"21!;(B) 
$(7!4!5!5!>4"70"714$P0"!#C"Q1!;4"Er'"S0"E"S14"G0"G1!;4"70"714"2r'"[0"2"[1!;4"Dr'"[0"D"[14"#0"#14"G0"G1!>4"Ir'"]r'"_0"I"]"_1!;4"90"9"Q1!;4"/r'"S0"/"S1!;4"50"5"Q14#2x!#9r'"[0"2#9"[1!;4"Hx!"Rx!"Ur'"c0"H"A"U"c1!>(B")))))
--- 100,106 ----
             (input-method . "tibetan-wylie")
             (features tibet-util)
             (documentation . t)
!            (sample-text
              . (tibetan-compose-string
                 (copy-sequence
  "Tibetan (4$(7"7r'"]0"7"]14"20"21!;4%P0"G#!"Q14"20"21!;(B) 
$(7!4!5!5!>4"70"714$P0"!#C"Q1!;4"Er'"S0"E"S14"G0"G1!;4"70"714"2r'"[0"2"[1!;4"Dr'"[0"D"[14"#0"#14"G0"G1!>4"Ir'"]r'"_0"I"]"_1!;4"90"9"Q1!;4"/r'"S0"/"S1!;4"50"5"Q14#2x!#9r'"[0"2#9"[1!;4"Hx!"Rx!"Ur'"c0"H"A"U"c1!>(B")))))