From e3e968e3d731261bd8d7947964e9c47a6554d4fb Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Tue, 17 May 2005 09:56:21 +0000
Subject: [PATCH] (G0-6566): Separate GT-K00266. (<CJK RADICAL SNOUT TWO>):
 Copied from u02E00-CJK-Radical-Supplement.el; unify
 GT-K00266. (BC-897C): Map to <CJK RADICAL SNOUT TWO>
 instead of U+5F50.

---
 lisp/utf-2000/Ideograph-R058-Snout.el |   34 +++++++++++++++++++++++----------
 1 file changed, 24 insertions(+), 10 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R058-Snout.el b/lisp/utf-2000/Ideograph-R058-Snout.el
index 0a806d7..8120cad 100644
--- a/lisp/utf-2000/Ideograph-R058-Snout.el
+++ b/lisp/utf-2000/Ideograph-R058-Snout.el
@@ -22,16 +22,8 @@
   '((<-denotational
      ((=ucs		  . #x5F50)	; 彐
       ))
-    (=gb2312		. #x6566)	; &GT-K00266; [69-70]
-    (=gt-k		. 00266)	; &I-GT-K00266;
-    (=gt-pj-k1		. #x3663)	; &GT-K00266; [22-67]
-    (=ucs@unicode	. #x5F50)	; &GT-K00266;
-    ))
-(define-char
-  '((<-denotational
-     ((=ucs		  . #x5F50)	; 彐
-      ))
-    (=big5-cdp		. #x897C)	; &CDP-897C;
+    (=gb2312		. #x6566)	; &G0-6566; [69-70]
+    (=ucs@unicode	. #x5F50)	; &G0-6566;
     ))
 (define-char
   '((<-denotational
@@ -49,6 +41,28 @@
     (=gt-pj-k1		. #x3974)	; &GT-K00267; [25-84]
     ))
 (define-char
+  '((name		. "CJK RADICAL SNOUT TWO")
+    (general-category	symbol other) ; Informative Category
+    (bidi-category	. "ON")
+    (mirrored		. nil)
+    (<-denotational
+     ((=ucs		  . #x5F50)	; 彐
+      ))
+    (<-radical
+     ((=ucs		  . #x5F50)	; 彐
+      ))
+    (=ucs		. #x2E95)	; ⺕
+    (=gt-k		. 00266)	; &I-GT-K00266;
+    (=gt-pj-k1		. #x3663)	; ⺕ [22-67]
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "CJK RADICAL SNOUT TWO")
+      (=ucs		  . #x2E95)	; ⺕
+      ))
+    (=big5-cdp		. #x897C)	; &CDP-897C;
+    ))
+(define-char
   '((ideographic-radical . 58)	; â¼¹
     (ideographic-strokes . 0)
     (total-strokes	 . 3)
-- 
1.7.10.4