;; (princ (format "<h1>%s</h1>\n"
;; (www-format-encode-string (char-to-string object))))
;; (dolist (feature (char-feature-property '$object 'additional-features))
;; (princ (format "<h1>%s</h1>\n"
;; (www-format-encode-string (char-to-string object))))
;; (dolist (feature (char-feature-property '$object 'additional-features))