From: MORIOKA Tomohiko Date: Thu, 13 Sep 2012 02:02:09 +0000 (+0900) Subject: (www-batch-view): Fix problem when decoding URL-encoding of genre. X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=55254863a0e1ab98c3b0458265d23e981b6e61ce;p=chise%2Fest.git (www-batch-view): Fix problem when decoding URL-encoding of genre. --- diff --git a/cwiki-view.el b/cwiki-view.el index 85dc284..98187cc 100644 --- a/cwiki-view.el +++ b/cwiki-view.el @@ -381,7 +381,7 @@ size=\"30\" maxlength=\"30\" value=\"%s\" />" (car (split-string accept-language ",")) ";")) "-")))) - ret) + ret genre) (princ "Content-Type: text/html; charset=UTF-8 " (setq target (mapcar (lambda (cell) (if (string-match "=" cell) - (cons - (intern - (decode-uri-string - (substring cell 0 (match-beginning 0)) - 'utf-8-mcs-er)) - (substring cell (match-end 0))) + (progn + (setq genre (substring cell 0 (match-beginning 0)) + ret (substring cell (match-end 0))) + (cons + (intern + (decode-uri-string genre 'utf-8-mcs-er)) + ret)) (list (decode-uri-string cell 'utf-8-mcs-er)))) (split-string target "&"))) (setq ret (car target))