-
-(defvar mm-mime-file-types
- '(("\\.rtf$" "text/richtext")
- ("\\.\\(html\\|htm\\)$" "text/html")
- ("\\.ps$" "application/postscript"
- (encoding quoted-printable)
- (disposition "attachment"))
- ("\\.\\(jpeg\\|jpg\\)$" "image/jpeg")
- ("\\.gif$" "image/gif")
- ("\\.png$" "image/png")
- ("\\.\\(tiff\\|tif\\)$" "image/tiff")
- ("\\.pic$" "image/x-pic")
- ("\\.mag$" "image/x-mag")
- ("\\.xbm$" "image/x-xbm")
- ("\\.xwd$" "image/x-xwd")
- ("\\.au$" "audio/basic")
- ("\\.mpg$" "video/mpeg")
- ("\\.txt$" "text/plain")
- ("\\.el$" "application/octet-stream"
- ("type" ."emacs-lisp"))
- ("\\.lsp$" "application/octet-stream"
- ("type" "common-lisp"))
- ("\\.tar\\.gz$" "application/octet-stream"
- ("type" "tar+gzip"))
- ("\\.tgz$" "application/octet-stream"
- ("type" "tar+gzip"))
- ("\\.tar\\.Z$" "application/octet-stream"
- ("type" "tar+compress"))
- ("\\.taz$" "application/octet-stream"
- ("type" "tar+compress"))
- ("\\.gz$" "application/octet-stream"
- ("type" "gzip"))
- ("\\.Z$" "application/octet-stream"
- ("type" "compress"))
- ("\\.lzh$" "application/octet-stream"
- ("type" . "lha"))
- ("\\.zip$" "application/zip")
- ("\\.diffs?$" "text/plain"
- ("type" . "patch"))
- ("\\.patch$" "application/octet-stream"
- ("type" "patch"))
- ("\\.signature" "text/plain")
- (".*" "application/octet-stream"))
- "*Alist of regexps and MIME types.")
-
-(defvar mm-content-transfer-encoding-defaults
- '(("text/.*" quoted-printable)
+(require 'mailcap)
+(eval-and-compile
+ (autoload 'mm-body-7-or-8 "mm-bodies")
+ (autoload 'mm-long-lines-p "mm-bodies"))
+
+(defcustom mm-content-transfer-encoding-defaults
+ '(("text/x-patch" 8bit)
+ ("text/.*" qp-or-base64)
+ ("message/rfc822" 8bit)
+ ("application/emacs-lisp" 8bit)
+ ("application/x-emacs-lisp" 8bit)
+ ("application/x-patch" 8bit)