;;; char-db-util.el --- Character Database utility -*- coding: utf-8-er; -*-
;; Copyright (C) 1998,1999,2000,2001,2002,2003,2004,2005,2006,2007,
-;; 2008,2009,2010,2011,2012,2013,2014,2015,2016 MORIOKA Tomohiko.
+;; 2008,2009,2010,2011,2012,2013,2014,2015,2016,2017 MORIOKA Tomohiko.
;; Author: MORIOKA Tomohiko <tomo@kanji.zinbun.kyoto-u.ac.jp>
;; Keywords: CHISE, Character Database, ISO/IEC 10646, UCS, Unicode, MULE.
==hanyo-denshi/jb
==hanyo-denshi/jc
==hanyo-denshi/ft
+ ==hanyo-denshi/ia
==hanyo-denshi/ib
==hanyo-denshi/hg
==hanyo-denshi/jt
==hanyo-denshi/ks
+ ==hanyo-denshi/tk
=gt
=gt-k
=daikanwa
=ucs-var-002
=ucs-var-003
=ucs-var-004
+ =ucs-var-005
=ucs-var-006
=ucs-var-008
=ucs-var-010
=ucs-itaiji-006
=ucs-itaiji-008
=ucs-itaiji-009
+ =>ucs-itaiji-001
+ =>ucs-itaiji-002
+ =>ucs-itaiji-005
+ =>ucs-itaiji-006
+ =big5-cdp-var-001
+ =big5-cdp-var-002
=big5-cdp-var-003
=big5-cdp-var-004
=big5-cdp-var-005
+ =big5-cdp-itaiji-001
+ =big5-cdp-itaiji-002
+ =big5-cdp-itaiji-003
+ =>big5-cdp-itaiji-001
=>ucs@iwds-1
+ =>ucs@component
==ucs@gb
=ucs@JP/hanazono))
(let ((lbs (concat "\n" (make-string (current-column) ?\ )))
separator cell sources required-features
ret)
+ (if (characterp value)
+ (setq value (list value)))
(while (consp value)
(setq cell (car value))
(if (integerp cell)