diff options
| author | Paul Eggert <eggert@cs.ucla.edu> | 2017-10-20 18:12:01 -0700 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2017-10-20 18:12:21 -0700 |
| commit | e655946ce0946b7081b037fa50be4d3fb1609b0b (patch) | |
| tree | 6537a31401f08baddc229977186aa8b003c116fa /lisp/gnus | |
| parent | 6a00914d6d4e4eaac4d4beea19570838a72a1e39 (diff) | |
| download | emacs-e655946ce0946b7081b037fa50be4d3fb1609b0b.tar.gz | |
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.
Diffstat (limited to 'lisp/gnus')
| -rw-r--r-- | lisp/gnus/gnus-sum.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el index 48571096cc7..79d38f1bfe3 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) |