(mm-encode-coding-string): Alias to `encode-coding-string'.

(mm-decode-coding-string): Alias to 'decode-coding-string'.

diff --git a/ChangeLog b/ChangeLog
index f44e154..ce97e2a 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2002-01-21  TSUCHIYA Masatoshi  <tsuchiya@namazu.org>
+
+       * lisp/nnheader.el (mm-encode-coding-string): Alias to
+       `encode-coding-string'.
+       (mm-decode-coding-string): Alias to 'decode-coding-string'.
+
 2002-01-21  Katsumi Yamaoka  <yamaoka@jpl.org>
 
        * lisp/gnus-vers.el: T-gnus 6.15.6 revision 00.

diff --git a/lisp/nnheader.el b/lisp/nnheader.el
index d1c5489..8d7bc20 100644 (file)
--- a/lisp/nnheader.el
+++ b/lisp/nnheader.el
@@ -1209,6 +1209,9 @@ find-file-hooks, etc.
        'multibyte-string-p
       'ignore))
 
+  (defalias 'mm-encode-coding-string 'encode-coding-string)
+  (defalias 'mm-decode-coding-string 'decode-coding-string)
+
   (defun nnheader-detect-coding-region (start end)
     "Like 'detect-coding-region' except returning the best one."
     (let ((coding-systems