X-Git-Url: http://cgit.sxemacs.org/?p=gnus;a=blobdiff_plain;f=lisp%2Fmm-encode.el;h=4901ff10277a54d261084b5942b81d4b9528d713;hp=055ba475b8e18e34a92ab1ba184647ca89dc4971;hb=94f288135f95ca48fb50f5aa43bc09f9669c5c23;hpb=4c2a7a1c25d5b10316f35f28c972ef3e70225f25 diff --git a/lisp/mm-encode.el b/lisp/mm-encode.el index 055ba475b..4901ff102 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-2015 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))