(mailcap-file): Use `defcustom'.
authormorioka <morioka>
Mon, 15 Jun 1998 18:04:32 +0000 (18:04 +0000)
committermorioka <morioka>
Mon, 15 Jun 1998 18:04:32 +0000 (18:04 +0000)
mailcap.el

index 76b3812..12eee88 100644 (file)
@@ -170,8 +170,11 @@ order.  Otherwise result is not sorted."
            (t entries)
            ))))
 
-(defvar mailcap-file "~/.mailcap"
-  "*File name of user's mailcap file.")
+
+(defcustom mailcap-file "~/.mailcap"
+  "*File name of user's mailcap file."
+  :group 'mime
+  :type 'file)
 
 (defun mailcap-parse-file (&optional filename order)
   "Parse FILENAME as a mailcap, and return the result.