- Add some `=ucs@cns' features.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R040-Roof.el

diff --git a/lisp/utf-2000/Ideograph-R040-Roof.el b/lisp/utf-2000/Ideograph-R040-Roof.el
index 275fbd5..6ae1ae6 100644 (file)
--- a/lisp/utf-2000/Ideograph-R040-Roof.el
+++ b/lisp/utf-2000/Ideograph-R040-Roof.el
@@ -38,6 +38,12 @@
     (=cns11643-6       . #x2169)       ; &I-C6-2169; [01-73]
     ))
 (define-char
+  '((ideographic-radical . 40) ; ⼧
+    (ideographic-strokes . 1)
+    (total-strokes      . 4)
+    (=ucs              . #x3749)       ; 㝉
+    ))
+(define-char
   '((=>ucs             . #x5B81)       ; 宁
     (ideographic-radical . 40) ; ⼧
     (ideographic-strokes . 2)