From 6270ca8debda8eb92f171d0a5f355efdce1393c3 Mon Sep 17 00:00:00 2001
From: morioka <morioka>
Date: Thu, 12 Mar 1998 18:27:27 +0000
Subject: [PATCH] (mailcap-look-at-type-field): Change type and subtype to
 symbol.

---
 mailcap.el |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/mailcap.el b/mailcap.el
index 3bc3207..f3b82ce 100644
--- a/mailcap.el
+++ b/mailcap.el
@@ -61,9 +61,9 @@
 	  (forward-char)
 	  (let ((subtype (mailcap-look-at-token)))
 	    (if subtype
-		(cons (cons 'type type)
+		(cons (cons 'type (intern type))
 		      (unless (string= subtype "*")
-			(list (cons 'subtype subtype))
+			(list (cons 'subtype (intern subtype)))
 			))))))))
 
 
-- 
1.7.10.4