From: MORIOKA Tomohiko Date: Tue, 6 Apr 2010 00:05:41 +0000 (+0900) Subject: (www-edit-display-feature-desc): Display and support editing of X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=2c334867d01e2864d14b13d1a7d718a688fa327d;p=chise%2Fest.git (www-edit-display-feature-desc): Display and support editing of property `format'. --- diff --git a/cwiki-edit.el b/cwiki-edit.el index 5341169..ceceeb1 100644 --- a/cwiki-edit.el +++ b/cwiki-edit.el @@ -195,13 +195,22 @@ size=\"30\" maxlength=\"30\" value=\"%s\">に限\u5B9Aしない) (or (www-feature-value-format feature-name) 'default)) (www-html-display-paragraph - (format "value-format : %s [[[edit|edit.cgi?feature=%s&property=name]]]" + (format "value-format : %s [[[edit|edit.cgi?feature=%s&property=value-format]]]" (www-xml-format-list (or (www-feature-value-format feature-name) 'default)) - ;; (char-feature-property feature-name 'name) - uri-feature-name ; (www-uri-encode-feature-name feature-name) - ))) + uri-feature-name))) + (if (eq property-name 'format) + (www-edit-display-feature-input-box + feature-name property-name + 'wiki-text + (or (char-feature-property feature-name 'format) + '((name) " : " (value)))) + (www-html-display-paragraph + (format "format : %s [[[edit|edit.cgi?feature=%s&property=format]]]" + (www-xml-format-list + (char-feature-property feature-name 'format)) + uri-feature-name))) (www-html-display-paragraph (format "description : %s" (or (char-feature-property feature-name 'description)