Add some missing code points of JIS X 0213:2000 plain 1.
[chise/xemacs-chise.git-] / lisp / utf-2000 / ideograph-util.el
index 8c236af..39590bd 100644 (file)
 ;;         ((null b) t)
 ;;         (t (< a b))))
 
+;;;###autoload
 (defun char-representative-of-daikanwa (char)
   (if (get-char-attribute char 'ideograph-daikanwa)
       char
               file))))
   (with-temp-buffer
     (insert-ideograph-radical-char-data radical)
-    (char-db-update-comment)
     (let ((coding-system-for-write 'utf-8))
       (write-region (point-min)(point-max) file)
       )))