From cdbd719d4a3ecf1125409b96dbbbe98c895b7e47 Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Tue, 22 Jun 2004 23:29:55 +0000
Subject: [PATCH] (U+51B0): Add `->vulgar' for U+6C37.

---
 lisp/utf-2000/Ideograph-R015-Ice.el |    9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/lisp/utf-2000/Ideograph-R015-Ice.el b/lisp/utf-2000/Ideograph-R015-Ice.el
index 4434026..5d8858b 100644
--- a/lisp/utf-2000/Ideograph-R015-Ice.el
+++ b/lisp/utf-2000/Ideograph-R015-Ice.el
@@ -144,9 +144,16 @@
       ))
     (->same*sources
      shuowen kanjo ronkou jiyun daikanwa)
+    (->vulgar
+     ((=ucs		  . #x6C37)	; æ°·
+      (=daikanwa	  . 17087)	; &I-M-17087;
+      ))
+    (->vulgar*sources
+     zhengzi-tong daikanwa)
     (<-original
      ((shinjigen-1	  . 4051)
-      (=daikanwa	  . 17087)	; &I-M-17087;
+      (=ucs		  . #x6C37)	; æ°·
+      (=jis-x0208	  . #x4939)	; &I-J90-4939; [41-25]
       ))
     (<-original*sources
      shinjigen-1)
-- 
1.7.10.4