Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
5eee36fa
Commit
5eee36fa
authored
Jan 04, 2001
by
Dave Love
Browse files
(nnmail-pathname-coding-system): Defvar when
compiling. (gnus-make-directory): Require nnmail.
parent
75d2d89f
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
9 additions
and
1 deletion
+9
-1
lisp/gnus/ChangeLog
lisp/gnus/ChangeLog
+4
-0
lisp/gnus/gnus-util.el
lisp/gnus/gnus-util.el
+5
-1
No files found.
lisp/gnus/ChangeLog
View file @
5eee36fa
2001-01-04 Dave Love <fx@gnu.org>
* gnus-util.el (nnmail-pathname-coding-system): Defvar when
compiling.
(gnus-make-directory): Require nnmail.
* mm-decode.el (mm-inline-media-tests): Add
image/x-portable-bitmap.
(mm-get-image): Grok pbm.
...
...
lisp/gnus/gnus-util.el
View file @
5eee36fa
...
...
@@ -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 @@ 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
)))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment