Use cons and list rather than . and quote-notation to construct the alist to avoid...

diff --git a/lisp/eweouz.el b/lisp/eweouz.el
index 6c4a83881f88e9248f7c3e8ffff30e1affc26a40..451636d4b4e6671a0ee57aee9e84199409490b05 100644 (file)
--- a/lisp/eweouz.el
+++ b/lisp/eweouz.el
@@ -147,8 +147,8 @@
   (save-excursion
     (set-buffer gnus-article-buffer)
     (let* ((from (mail-header-parse-address (gnus-fetch-field "From")))
-          (record '((email . (car from))
-                    (name . (cdr from)))))
+          (record (list (cons 'email (car from))
+                        (cons 'name (cdr from)))))
       (eweouz-do-add record))))
 
 (defun eweouz-do-add (record)