(char-ideographic-strokes-from-domains): Moved to ideograph-subr.el.
authortomo <tomo>
Fri, 4 Jun 2010 05:12:58 +0000 (05:12 +0000)
committertomo <tomo>
Fri, 4 Jun 2010 05:12:58 +0000 (05:12 +0000)
lisp/utf-2000/ideograph-util.el

index 095a018..80b9411 100644 (file)
    14 15 16 16 17])
 
 ;;;###autoload
-(defun char-ideographic-strokes-from-domains (char domains &optional radical)
-  (if radical
-      (get-char-feature-from-domains char 'ideographic-strokes domains
-                                    'ideographic-radical radical)
-    (get-char-feature-from-domains char 'ideographic-strokes domains)))
-
-;;;###autoload
 (defun char-ideographic-strokes (char &optional radical preferred-domains)
   (let (ret)
     (or (catch 'tag