X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=mcs-ltn1.el;h=8cf14e6b259fbcac9caddca0fa61b60a091f07e4;hb=bcd8ea75de6c958558fd6a2c3299911968d7d1c9;hp=aa76ef91398f1e8d7c88eb5727c228f3a20d2205;hpb=984604d5fc994ae264175786ef64ddd74f6ec2cd;p=elisp%2Fapel.git diff --git a/mcs-ltn1.el b/mcs-ltn1.el index aa76ef9..8cf14e6 100644 --- a/mcs-ltn1.el +++ b/mcs-ltn1.el @@ -20,8 +20,8 @@ ;; You should have received a copy of the GNU General Public License ;; along with GNU Emacs; see the file COPYING. If not, write to the -;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, -;; Boston, MA 02111-1307, USA. +;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, +;; Boston, MA 02110-1301, USA. ;;; Code: @@ -38,7 +38,7 @@ (mac . "\r")))) ) -(defun mime-charset-to-coding-system (charset) +(defun mime-charset-to-coding-system (charset &optional lbt) (if (stringp charset) (setq charset (intern (downcase charset)))) (if (memq charset (list 'us-ascii default-mime-charset))