From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Mon, 26 Aug 2013 07:20:47 +0000 (+0900)
Subject: (www-edit-display-feature-desc): Support `value-presentation-format'.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=0708bdce4edf2cec6bb502a6fe8d436b22eab3b7;p=chise%2Fest.git

(www-edit-display-feature-desc): Support `value-presentation-format'.
---

diff --git a/cwiki-edit.el b/cwiki-edit.el
index 4cad138..8450129 100644
--- a/cwiki-edit.el
+++ b/cwiki-edit.el
@@ -232,6 +232,18 @@ size=\"30\" maxlength=\"30\" value=\"%s\">に限\u5B9Aしない)
 		(or (www-feature-value-format feature-name)
 		    'default))
 	       uri-feature-name)))
+    (if (eq property-name 'value-presentation-format)
+	(www-edit-display-feature-input-box
+	 feature-name property-name
+	 'default ; 'wiki-text
+	 (or (www-feature-value-format feature-name)
+	     'default))
+      (www-html-display-paragraph
+       (format "value-presentation-format : %s [[[edit|edit.cgi?feature=%s&property=value-presentation-format]]]"
+	       (www-xml-format-list
+		(or (www-feature-value-format feature-name)
+		    'default))
+	       uri-feature-name)))
     (if (eq property-name 'format)
 	(www-edit-display-feature-input-box
 	 feature-name property-name