(with-coding-priority coding-priority
(detect-coding-region from to)))))
+(declare-function internal-char-font "fontset.c" (position &optional ch))
+
;;;###autoload
(defun char-displayable-p (char)
"Return non-nil if we should be able to display CHAR.
(cond
((listp cs-list)
(catch 'tag
- (mapc #'(lambda (charset)
+ (mapc #'(lambda (charset)
(if (encode-char char charset)
(throw 'tag charset)))
cs-list)