From: yamaoka <yamaoka>
Date: Sun, 13 Apr 2003 23:37:03 +0000 (+0000)
Subject: * lpath.el: Fbind `coding-system-base' for Mule 2.
X-Git-Tag: t-gnus-6_15_20-00-quimby~30
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=6cf8c93da070c52b403581593d5e111847591d3b;p=elisp%2Fgnus.git-

* lpath.el: Fbind `coding-system-base' for Mule 2.
---

diff --git a/ChangeLog b/ChangeLog
index 61b1e62..c91707c 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,9 @@
 2003-04-13  Katsumi Yamaoka  <yamaoka@jpl.org>
 
+	* lisp/lpath.el: Fbind `coding-system-base' for Mule 2.
+
+2003-04-13  Katsumi Yamaoka  <yamaoka@jpl.org>
+
 	* lisp/gnus-vers.el: T-gnus 6.15.19 (quimby) revision 00.
 
 2003-04-13  Katsumi Yamaoka  <yamaoka@jpl.org>
diff --git a/lisp/lpath.el b/lisp/lpath.el
index bd4a7eb..7b01bb5 100644
--- a/lisp/lpath.el
+++ b/lisp/lpath.el
@@ -79,10 +79,11 @@
 	 '(function-max-args smiley-encode-buffer))
 	((boundp 'MULE)
 	 '(charsetp
-	   coding-system-get coding-system-list coding-system-to-mime-charset
-	   compose-mail file-name-extension find-coding-systems-for-charsets
-	   find-coding-systems-region function-max-args get-charset-property
-	   smiley-encode-buffer smtpmail-send-it))
+	   coding-system-base coding-system-get coding-system-list
+	   coding-system-to-mime-charset compose-mail file-name-extension
+	   find-coding-systems-for-charsets find-coding-systems-region
+	   function-max-args get-charset-property smiley-encode-buffer
+	   smtpmail-send-it))
 	(t
 	 '(function-max-args smiley-encode-buffer))))
       (common-fns