Commit 5eee36fa authored by Dave Love's avatar Dave Love
Browse files

(nnmail-pathname-coding-system): Defvar when

(gnus-make-directory): Require nnmail.
parent 75d2d89f
2001-01-04 Dave Love <>
* gnus-util.el (nnmail-pathname-coding-system): Defvar when
(gnus-make-directory): Require nnmail.
* mm-decode.el (mm-inline-media-tests): Add
(mm-get-image): Grok pbm.
......@@ -32,7 +32,10 @@
;;; Code:
(require 'custom)
(eval-when-compile (require 'cl))
(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 @@ Bind `print-quoted' and `print-readably' to t while printing."
(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)))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment