changeset 35051:d80c28ab0b86

(nnmail-pathname-coding-system): Defvar when compiling. (gnus-make-directory): Require nnmail.
author Dave Love <fx@gnu.org>
date Thu, 04 Jan 2001 15:38:41 +0000
parents eeb50448541d
children 07b5f5fdb0ce
files lisp/gnus/gnus-util.el
diffstat 1 files changed, 5 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- 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)))