diff options
Diffstat (limited to 'lisp/gnus/message.el')
| -rw-r--r-- | lisp/gnus/message.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el index f0ae6358431..1d0aaffa426 100644 --- a/lisp/gnus/message.el +++ b/lisp/gnus/message.el @@ -3748,13 +3748,13 @@ prefix, and don't delete any headers." (goto-char (mark t)) (insert-before-markers ?\n) (goto-char pt)))) - (cond - ((eq 'above message-cite-reply-position) + (case message-cite-reply-position + (above (message-goto-body) (insert body-text) (insert (if (bolp) "\n" "\n\n")) (message-goto-body)) - ((eq 'below message-cite-reply-position) + (below (message-goto-signature))) ;; Add a `message-setup-very-last-hook' here? ;; Add `gnus-article-highlight-citation' here? |