Commit e655946c authored by Paul Eggert's avatar Paul Eggert

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.
parent 6a00914d
......@@ -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)
......
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