# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 978622721 0
# Node ID d80c28ab0b8666146a21a6f12cf787f2895d702c
# Parent  eeb50448541d899cdc2b774d9c6907faeb8048e9
(nnmail-pathname-coding-system): Defvar when
compiling.
(gnus-make-directory): Require nnmail.

diff -r eeb50448541d -r d80c28ab0b86 lisp/gnus/gnus-util.el
--- a/lisp/gnus/gnus-util.el	Thu Jan 04 15:36:59 2001 +0000
+++ b/lisp/gnus/gnus-util.el	Thu Jan 04 15:38:41 2001 +0000
@@ -32,7 +32,10 @@
 ;;; Code:
 
 (require 'custom)
-(eval-when-compile (require 'cl))
+(eval-when-compile
+  (require 'cl)
+  ;; Fixme: this should be a gnus variable, not nnmail-.
+  (defvar nnmail-pathname-coding-system))
 (require 'nnheader)
 (require 'time-date)
 
@@ -531,6 +534,7 @@
 
 (defun gnus-make-directory (directory)
   "Make DIRECTORY (and all its parents) if it doesn't exist."
+  (require 'nnmail)
   (let ((file-name-coding-system nnmail-pathname-coding-system))
     (when (and directory
 	       (not (file-exists-p directory)))