From 65d9735dfa22727b6c3ec95a606d946ef9bf38c6 Mon Sep 17 00:00:00 2001 From: MORIOKA Tomohiko Date: Fri, 19 Mar 2010 14:49:19 +0900 Subject: [PATCH] (www-edit-display-feature-input-box): Escape <">. --- cwiki-edit.el | 14 +++++++++++--- 1 file changed, 11 insertions(+), 3 deletions(-) diff --git a/cwiki-edit.el b/cwiki-edit.el index f33c550..f58bd94 100644 --- a/cwiki-edit.el +++ b/cwiki-edit.el @@ -71,9 +71,17 @@ size=\"64\" maxlength=\"256\" value=\"%s\"> "0x" "") format - (www-format-value char feature-name - (www-char-feature char feature-name) - format 'without-tags))) + (mapconcat (lambda (c) + (cond + ;; ((eq c ?<) "&lt;") + ;; ((eq c ?>) "&gt;") + ((eq c ?") """) + (t + (char-to-string c)))) + (www-format-value char feature-name + (www-char-feature char feature-name) + format 'without-tags) + ""))) ) (defun www-edit-display-char-desc (uri-char uri-feature-name -- 1.7.10.4