summaryrefslogtreecommitdiff
path: root/lisp/gnus/gnus-int.el
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2014-02-05 04:35:29 +0000
committerKatsumi Yamaoka <yamaoka@jpl.org>2014-02-05 04:35:29 +0000
commit3660c612b3b0f45fe8bf80d1ed52d50c41f48713 (patch)
tree1073415737a97fbdcaf0614a309ec6ff782881b1 /lisp/gnus/gnus-int.el
parentdd27d13b5083d0a09d1b70cbde2cdecf8d98cf4d (diff)
downloademacs-3660c612b3b0f45fe8bf80d1ed52d50c41f48713.tar.gz
lisp/gnus/gnus-int.el (gnus-request-accept-article): Doc fix
Diffstat (limited to 'lisp/gnus/gnus-int.el')
-rw-r--r--lisp/gnus/gnus-int.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/gnus/gnus-int.el b/lisp/gnus/gnus-int.el
index 34bf78a16b8..edf61197638 100644
--- a/lisp/gnus/gnus-int.el
+++ b/lisp/gnus/gnus-int.el
@@ -754,7 +754,6 @@ If GROUP is nil, all groups on GNUS-COMMAND-METHOD are scanned."
(defun gnus-request-accept-article (group &optional gnus-command-method last
no-encode)
- ;; Make sure there's a newline at the end of the article.
(when (stringp gnus-command-method)
(setq gnus-command-method (gnus-server-to-method gnus-command-method)))
(when (and (not gnus-command-method)
@@ -762,6 +761,7 @@ If GROUP is nil, all groups on GNUS-COMMAND-METHOD are scanned."
(setq gnus-command-method (or (gnus-find-method-for-group group)
(gnus-group-name-to-method group))))
(goto-char (point-max))
+ ;; Make sure there's a newline at the end of the article.
(unless (bolp)
(insert "\n"))
(unless no-encode