* nndoc.el (nndoc-oe-dbx-type-p): Use `string-as-multibyte' instead of

 `mm-string-as-multibyte'.
(nndoc-possibly-change-buffer): Use `nnheader-insert-file-contents' instead of
 `mm-insert-file-contents'.

diff --git a/ChangeLog b/ChangeLog
index 88a017b..b33b92b 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2001-10-01  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+       * lisp/nndoc.el (nndoc-oe-dbx-type-p): Use `string-as-multibyte'
+       instead of `mm-string-as-multibyte'.
+       (nndoc-possibly-change-buffer): Use `nnheader-insert-file-contents'
+       instead of `mm-insert-file-contents'.
+
 2001-09-28  Katsumi Yamaoka  <yamaoka@jpl.org>
 
        * lisp/gnus-vers.el (gnus-revision-number): Increment to 08.

diff --git a/lisp/nndoc.el b/lisp/nndoc.el
index 4b0574b..7ef6e26 100644 (file)
--- a/lisp/nndoc.el
+++ b/lisp/nndoc.el
@@ -320,8 +320,8 @@ from the document.")
        (erase-buffer)
        (if (and (stringp nndoc-address)
                 (string-match nndoc-binary-file-names nndoc-address))
-           (let ((coding-system-for-read 'binary))
-             (mm-insert-file-contents nndoc-address))
+           (let ((nnheader-file-coding-system 'binary))
+             (nnheader-insert-file-contents nndoc-address))
          (if (stringp nndoc-address)
              (nnheader-insert-file-contents nndoc-address)
            (insert-buffer-substring nndoc-address))
@@ -628,7 +628,7 @@ from the document.")
   (looking-at "JMF"))
 
 (defun nndoc-oe-dbx-type-p ()
-  (looking-at (mm-string-as-multibyte "\317\255\022\376")))
+  (looking-at (string-as-multibyte "\317\255\022\376")))
 
 (defun nndoc-read-little-endian ()
   (+ (prog1 (char-after) (forward-char 1))