* Makefile: Output parse table to ew-parse.out instead of

[elisp/flim.git] / ew-dec.el

diff --git a/ew-dec.el b/ew-dec.el
index 46ac4b5..eebda02 100644 (file)
--- 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))