[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)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs-26 e655946: Fix two minor Gnus typos,
Paul Eggert <=