X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=ew-dec.el;h=eebda02c92ab8e9b207705afe8ce7f8b150da2d7;hb=955b92b07f71c449e9ff8f2b49b7e12408527cec;hp=46ac4b525574d4c79ebca412bef50c221c8b44e5;hpb=12bb43b32a791cf55b701bd49fc5ee0294535102;p=elisp%2Fflim.git

diff --git a/ew-dec.el b/ew-dec.el
index 46ac4b5..eebda02 100644
--- a/ew-dec.el
+++ b/ew-dec.el
@@ -49,7 +49,7 @@ instead of its argument."
 
 (defun ew-decode-field-no-cache (field-name field-body &optional eword-filter)
   "No caching version of ew-decode-field."
-  (let ((tmp (assoc (downcase field-name) ew-decode-field-syntax-alist))
+  (let ((tmp (assq (intern (downcase field-name)) ew-decode-field-syntax-alist))
 	frag-anchor frag1 frag2 decode)
     (if tmp
 	(setq tmp (cdr tmp))