From 4f2910b9e9bd89dba5bc211352691e5082d4c3b2 Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Sat, 16 Apr 2005 23:48:15 +0000
Subject: [PATCH] (GT-K00606): Add `<-ideographic-component-forms' for U+821F.
 (GT-K00607): Likewise.

---
 lisp/utf-2000/Ideograph-R137-Boat.el |   12 ++++++++----
 1 file changed, 8 insertions(+), 4 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R137-Boat.el b/lisp/utf-2000/Ideograph-R137-Boat.el
index e5202cd..43131ac 100644
--- a/lisp/utf-2000/Ideograph-R137-Boat.el
+++ b/lisp/utf-2000/Ideograph-R137-Boat.el
@@ -16,18 +16,22 @@
     (=daikanwa		. 30350)	; &I-M-30350;
     ))
 (define-char
-  '((morohashi-daikanwa	30350 0 7)
-    (ideographic-radical . 137)	; ⾈
+  '((ideographic-radical . 137)	; ⾈
     (ideographic-strokes . 0)
     (total-strokes	 . 4)
+    (<-ideographic-component-forms
+     ((=ucs		  . #x821F)	; 舟
+      ))
     (=gt-k		. 00606)	; &GT-K00606;
     (=gt-pj-k1		. #x3973)	; &GT-K00606; [25-83]
     ))
 (define-char
-  '((morohashi-daikanwa	30350 0 8)
-    (ideographic-radical . 137)	; ⾈
+  '((ideographic-radical . 137)	; ⾈
     (ideographic-strokes . 0)
     (total-strokes	 . 4)
+    (<-ideographic-component-forms
+     ((=ucs		  . #x821F)	; 舟
+      ))
     (=gt-k		. 00607)	; &GT-K00607;
     (=gt-pj-k1		. #x3821)	; &GT-K00607; [24-01]
     ))
-- 
1.7.10.4