T-gnus 6.14.6; synch up with Gnus v5.8.8.

[elisp/gnus.git-] / lisp / nnspool.el

diff --git a/lisp/nnspool.el b/lisp/nnspool.el
index b33a2db..9463d63 100644 (file)
--- a/lisp/nnspool.el
+++ b/lisp/nnspool.el
@@ -28,10 +28,12 @@
 
 ;;; Code:
 
+(eval-when-compile (require 'cl))
+(eval-when-compile (require 'gnus-clfns))
+
 (require 'nnheader)
 (require 'nntp)
 (require 'nnoo)
-(eval-when-compile (require 'cl))
 
 (nnoo-declare nnspool)
 
@@ -440,8 +442,8 @@ there.")
   (set-buffer nntp-server-buffer)
   (erase-buffer)
   (condition-case ()
-      (let ((coding-system-for-read nnspool-file-coding-system))
-       (mm-insert-file-contents file)
+      (let ((nnheader-file-coding-system nnspool-file-coding-system))
+       (nnheader-insert-file-contents file)
        t)
     (file-error nil)))