masscollaborationlabs/emacs
2
0
Fork 0
mirror of https://github.com/masscollaborationlabs/emacs.git synced 2025-07-15 08:21:18 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fix two minor Gnus typos

Browse source 
* lisp/gnus/gnus-sum.el (gnus-summary-import-article):
Remove unused local, and fix use of local that was never assigned to.
This commit is contained in:
Paul Eggert 2017-10-20 18:12:01 -07:00
parent 6a00914d6d
commit e655946ce0
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/gnus/gnus-sum.el
View file

@ -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)