X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=est-format.el;h=75493a9734a66bffc0d1dfead09a55abf02d0050;hb=dd7082c83e05bb4dca11526dec1a0d5925b755f7;hp=1b2703d1e48b461f570510bb6ad73728af1648fb;hpb=05ffd00f104110357b6674700ad56a8e4af2ee26;p=chise%2Fest.git

diff --git a/est-format.el b/est-format.el
index 1b2703d..75493a9 100644
--- a/est-format.el
+++ b/est-format.el
@@ -18,11 +18,10 @@
       (setq dest
 	    (format "%s %s=\"%s\""
 		    dest key
-		    (www-format-encode-string
-		     (format "%s"
-			     (est-format-unit val 'without-tags
-					      'without-edit 'as-property))
-		     'without-tags))))
+		    (format "%s"
+			    (est-format-unit val 'without-tags
+					     'without-edit 'as-property))
+		    )))
     dest))
 
 (defun est-format-unit (format-unit
@@ -63,7 +62,8 @@
 	    props (nth 1 format-unit)
 	    children (nthcdr 2 format-unit))
       (cond
-       ((eq name 'list)
+       ((or (eq name 'list)
+	    (eq name 'image-list))
 	(cond
 	 ((or (eq output-format 'plain-text)
 	      (eq output-format 'wiki-text))
@@ -238,7 +238,7 @@
        ((memq name '(div
 		     a ul ol p
 		     span
-		     input))
+		     input img))
 	)
        (t
 	(when (eq output-format 'html)