(www-display-feature-desc): Display [edit] button of `value-format'.

diff --git a/cwiki-view.el b/cwiki-view.el
index 30d07ae..911b190 100644 (file)
--- a/cwiki-view.el
+++ b/cwiki-view.el
@@ -136,11 +136,24 @@
              (or (www-feature-type feature-name)
                 ;; (char-feature-property feature-name 'type)
                 'generic)))
-    (www-html-display-paragraph
-     (format "value-format : %s"
-            (www-xml-format-list
-             (or (www-feature-value-format feature-name)
-                 'default))))
+    (princ (format "<p>value-format : %s "
+                  (www-format-encode-string
+                   (www-xml-format-list
+                    (or (www-feature-value-format feature-name)
+                        'default)))))
+    ;; (www-html-display-paragraph
+    ;;  (format "value-format : %s"
+    ;;          (www-xml-format-list
+    ;;           (or (www-feature-value-format feature-name)
+    ;;               'default))))
+    (princ
+     (format
+      " <a href=\"%s?feature=%s&property=value-format&format=wiki-text&char=%s\"
+><input type=\"submit\" value=\"edit\" /></a></p>"
+      chise-wiki-edit-url
+      uri-feature-name
+      uri-char))
+
     (www-html-display-paragraph
      (format "format : %s"
             (www-xml-format-list