(defvar chise-wiki-edit-url "edit.cgi")
(require 'cwiki-common)
+(require 'est-xml)
(defun www-add-display-feature-input-box (char &optional format)
(unless format
(defun www-add-display-char-desc (uri-char &optional lang format)
(when (stringp format)
(setq format (intern format)))
- (let ((char (www-uri-decode-char uri-char))
+ (let ((char (www-uri-decode-object 'character uri-char))
char-spec)
(when (characterp char)
(princ
(princ (format "lang=%S\n" lang))
(princ emacs-version)
(princ " CHISE ")
- (princ xemacs-chise-version)
+ (princ (encode-coding-string xemacs-chise-version 'utf-8-jp-er))
(princ "
</body>
</html>")