# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1020187433 0
# Node ID cdb2b9108c16f561948883766bdbbed90b47bf7d
# Parent  5a8ec18cf24256acef844153b48c4c3adc7bdd21
(tibetan-obsolete-glyphs): Now in tibet-util.el.

diff -r 5a8ec18cf242 -r cdb2b9108c16 lisp/language/tibetan.el
--- a/lisp/language/tibetan.el	Tue Apr 30 17:14:14 2002 +0000
+++ b/lisp/language/tibetan.el	Tue Apr 30 17:23:53 2002 +0000
@@ -555,23 +555,6 @@
     ("$(7"G#7(B" . "$(7%X(B")
     ("$(7"G#9(B" . "$(7%Y(B")))
 
-(defconst tibetan-obsolete-glyphs
-  `(("$(7!=(B" . "$(8!=(B")			; 2 col <-> 1 col
-    ("$(7!?(B" . "$(8!?(B")
-    ("$(7!@(B" . "$(8!@(B")
-    ("$(7!A(B" . "$(8!A(B")
-    ("$(7"`(B" . "$(8"`(B")
-    ("$(7!;(B" . "$(8!;(B")
-    ("$(7!D(B" . "$(8!D(B")
-    ;; Yes these are dirty. But ...
-    ("$(7!>(B $(7!>(B" . ,(compose-string "$(7!>(B $(7!>(B" 0 3 [?$(7!>(B (Br . Bl) ?  (Br . Bl) ?$(7!>(B]))
-    ("$(7!4!5!5(B" . ,(compose-string
-		  "$(7#R#S#S#S(B" 0 4
-		  [?$(7#R(B (Br . Bl) ?$(7#S(B (Br . Bl) ?$(7#S(B (Br . Bl) ?$(7#S(B]))
-    ("$(7!4!5(B" . ,(compose-string "$(7#R#S#S(B" 0 3 [?$(7#R(B (Br . Bl) ?$(7#S(B (Br . Bl) ?$(7#S(B]))
-    ("$(7!6(B" . ,(compose-string "$(7#R#S!I(B" 0 3 [?$(7#R(B (Br . Bl) ?$(7#S(B (br . tr) ?$(7!I(B]))
-    ("$(7!4(B"   . ,(compose-string "$(7#R#S(B" 0 2 [?$(7#R(B (Br . Bl) ?$(7#S(B]))))
-
 (defconst tibetan-regexp
   (let ((l (list tibetan-precomposed-transcription-alist
 		 tibetan-consonant-transcription-alist