(www-edit-display-feature-input-box): Use `www-get-feature-value'

instead of `www-char-feature'.
(www-edit-display-char-desc): Use `www-uri-decode-object' instead of
`www-uri-decode-char'.

diff --git a/cwiki-edit.el b/cwiki-edit.el
index ceceeb1..a669186 100644 (file)
--- a/cwiki-edit.el
+++ b/cwiki-edit.el
@@ -35,7 +35,7 @@ size=\"30\" maxlength=\"30\" value=\"%s\">
   (unless format
     (setq format 'default))
   (unless value
   (unless format
     (setq format 'default))
   (unless value

-    (setq value (www-char-feature char feature-name)))
+    (setq value (www-get-feature-value char feature-name)))

   (princ
    (format "<p><input type=\"text\" name=\"feature-name\"
 size=\"32\" maxlength=\"256\" value=\"%s\">"
   (princ
    (format "<p><input type=\"text\" name=\"feature-name\"
 size=\"32\" maxlength=\"256\" value=\"%s\">"

@@ -66,7 +66,7 @@ size=\"64\" maxlength=\"256\" value=\"%s\">
                                            &optional lang format)
   (when (stringp format)
     (setq format (intern format)))
                                            &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))

        (feature-name (www-uri-decode-feature-name uri-feature-name))
        base-name metadata-name
        char-spec str)
        (feature-name (www-uri-decode-feature-name uri-feature-name))
        base-name metadata-name
        char-spec str)