diff options
author | Paul Eggert <eggert@cs.ucla.edu> | 2018-09-15 15:00:54 -0700 |
---|---|---|
committer | Paul Eggert <eggert@cs.ucla.edu> | 2018-09-15 15:02:08 -0700 |
commit | d2048949bcd5735c17b4a194fc75d16ba25907ca (patch) | |
tree | 74ce8ab4788bfc33f1089f2b8498a0a8fd1f5595 /lisp/gnus/nnmaildir.el | |
parent | 3937b5b52af3eb78101dc385ac8dfe7a36e2e624 (diff) | |
download | emacs-d2048949bcd5735c17b4a194fc75d16ba25907ca.tar.gz |
Go back to old method for nnmaildir names
* lisp/gnus/nnmaildir.el (nnmaildir-request-accept-article):
Omit leading 0s after "M" in file name.
Problem reported by Glenn Morris in:
https://lists.gnu.org/r/emacs-devel/2018-09/msg00660.html
Diffstat (limited to 'lisp/gnus/nnmaildir.el')
-rw-r--r-- | lisp/gnus/nnmaildir.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/gnus/nnmaildir.el b/lisp/gnus/nnmaildir.el index 48a470c7462..fbabf573c4f 100644 --- a/lisp/gnus/nnmaildir.el +++ b/lisp/gnus/nnmaildir.el @@ -1463,7 +1463,7 @@ This variable is set by `nnmaildir-request-article'.") (unless (string-equal nnmaildir--delivery-time file) (setq nnmaildir--delivery-time file nnmaildir--delivery-count 0)) - (setq file (concat file (format-time-string "M%6N" time))) + (setq file (concat file "M" (number-to-string (caddr time)))) (setq file (concat file nnmaildir--delivery-pid) file (concat file "Q" (number-to-string nnmaildir--delivery-count)) file (concat file "." (nnmaildir--system-name)) |