emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] emacs-26 e655946: Fix two minor Gnus typos


From: Paul Eggert
Subject: [Emacs-diffs] emacs-26 e655946: Fix two minor Gnus typos
Date: Fri, 20 Oct 2017 21:12:33 -0400 (EDT)

branch: emacs-26
commit e655946ce0946b7081b037fa50be4d3fb1609b0b
Author: Paul Eggert <address@hidden>
Commit: Paul Eggert <address@hidden>

    Fix two minor Gnus typos
    
    * lisp/gnus/gnus-sum.el (gnus-summary-import-article):
    Remove unused local, and fix use of local that was never assigned to.
---
 lisp/gnus/gnus-sum.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el
index 4857109..79d38f1 100644
--- a/lisp/gnus/gnus-sum.el
+++ b/lisp/gnus/gnus-sum.el
@@ -10294,7 +10294,6 @@ latter case, they will be copied into the relevant 
groups."
   "Import an arbitrary file into a mail newsgroup."
   (interactive "fImport file: \nP")
   (let ((group gnus-newsgroup-name)
-       (now (current-time))
        atts lines group-art)
     (unless (gnus-check-backend-function 'request-accept-article group)
       (error "%s does not support article importing" group))
@@ -10313,6 +10312,7 @@ latter case, they will be copied into the relevant 
groups."
            (goto-char (point-min))
            (unless (re-search-forward "^date:" nil t)
              (goto-char (point-max))
+             (setq atts (file-attributes file))
              (insert "Date: " (message-make-date (nth 5 atts)) "\n")))
        ;; This doesn't look like an article, so we fudge some headers.
        (setq atts (file-attributes file)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]