X-Git-Url: http://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fmm-encode.el;h=c3febb01a0f9130d9dcfcae863a5d29fe6724f9f;hb=6910044663bc77081e08faabd6385cd34a9c8f5d;hp=055ba475b8e18e34a92ab1ba184647ca89dc4971;hpb=4c2a7a1c25d5b10316f35f28c972ef3e70225f25;p=gnus diff --git a/lisp/mm-encode.el b/lisp/mm-encode.el index 055ba475b..c3febb01a 100644 --- a/lisp/mm-encode.el +++ b/lisp/mm-encode.el @@ -1,6 +1,6 @@ ;;; mm-encode.el --- Functions for encoding MIME things -;; Copyright (C) 1998-2011 Free Software Foundation, Inc. +;; Copyright (C) 1998-2012 Free Software Foundation, Inc. ;; Author: Lars Magne Ingebrigtsen ;; MORIOKA Tomohiko @@ -97,6 +97,7 @@ This variable should never be set directly, but bound before a call to (insert "Content-Type: multipart/mixed; boundary=\"" boundary "\"\n") boundary)) +;;;###autoload (defun mm-default-file-encoding (file) "Return a default encoding for FILE." (if (not (string-match "\\.[^.]+$" file))