(mailcap-look-at-field): Change field-name to symbol.

[elisp/semi.git] / mailcap.el

diff --git a/mailcap.el b/mailcap.el
index 7e976a4..32aa278 100644 (file)
--- a/mailcap.el
+++ b/mailcap.el
@@ -117,9 +117,9 @@
                           (goto-char (match-end 0))
                           (mailcap-look-at-mtext))))
              (if value
-                 (cons token value)
+                 (cons (intern token) value)
                ))
-         (list token)
+         (list (intern token))
          ))))