Gnus responder com assinatura no topo
Pergunta
No modo de resumo, quando eu pressionar R para gnus-summary-reply-with-original ou F para gnus-resumo de acompanhamento-com-original, a minha assinatura é inserido abaixo do texto da mensagem original.
Como posso saber gnus para inserir minha assinatura no topo da mensagem, antes do texto citado da original?
Solução
Parece que isso não é uma opção embutida no Gnus (a partir de v5.10.8), então você tem que redefinir um dos built-in funções como assim:
(eval-after-load "gnus-msg"
(defun gnus-inews-yank-articles (articles)
(let (beg article yank-string)
(goto-char (point-max)) ; put articles after signature
(insert "\n") ; and one extra newline
; was this (message-goto-body)
(while (setq article (pop articles))
(when (listp article)
(setq yank-string (nth 1 article)
article (nth 0 article)))
(save-window-excursion
(set-buffer gnus-summary-buffer)
(gnus-summary-select-article nil nil nil article)
(gnus-summary-remove-process-mark article))
(gnus-copy-article-buffer nil yank-string)
(let ((message-reply-buffer gnus-article-copy)
(message-reply-headers
;; The headers are decoded.
(with-current-buffer gnus-article-copy
(save-restriction
(nnheader-narrow-to-headers)
(nnheader-parse-naked-head)))))
(message-yank-original)
(setq beg (or beg (mark t))))
(when articles
(insert "\n")))
(push-mark)
(goto-char beg))))
Eu passei a nova definição de 'gnus-inews-yank-articles
de forma eval-after-load
para que ele seja definido no momento apropriado. Obviamente, se você quer para permitir a personalização, criar uma variável e escrever o apropriado se comunicado.
Outras dicas
Na a versão de desenvolvimento do Gnus (e GNU Emacs), você pode definir a variável message-cite-reply-position
para `acima' .
Eu acho que você já sabe tudo sobre TOFU e porque não, por isso não vou blather sobre sobre isso.