我将 Gnus 5.13 用于电子邮件(在 Mac OS X 10.7.2 和 emacs 24 上)。我使用该gnus-posting-styles条目(eval (set (make-local-variable 'message-cite-reply-position) 'above))将点(光标)放在回复消息的顶部。这使我可以进行顶级回复或内联回复(在我想回复的消息之间)。不幸的是,上面的条目也将我的签名放在我想回复的消息之上。如果我想顶回复也没关系,但如果我想内联回复就错了。如何强制将签名放在我回复的消息下方?
1 回答
1
放弃“message-cite-reply-position”修改,我在我的 .gnus.el 文件中添加了以下内容,现在在回复电子邮件或新闻帖子时,首先是被抽出的消息,然后是我的签名,然后该点位于消息的开头。
(加载后评估“gnus-msg”
'(defun gnus-inews-yank-articles (文章)
(let (beg article yank-string)
(消息转到正文)
(而(setq文章(流行文章))
(当(listp文章)
(setq yank-string (nth 1 article)
文章(第 0 篇文章)))
(保存窗口游览
(set-buffer gnus-summary-buffer)
(gnus-summary-select-article nil nil nil文章)
(gnus-summary-remove-process-mark 文章))
(gnus-copy-article-buffer nil yank-string)
(let ((message-reply-buffer gnus-article-copy)
(消息回复标头
;; 标头被解码。
(with-current-buffer gnus-article-copy
(保存限制
(nnheader-narrow-to-headers)
(nnheader-parse-naked-head)))))
(消息-yank-原始)
(setq beg (or beg (mark t))))
(当文章
(插入“\n”)))
(按标记)
; (goto-char beg))) -- 原文
(message-goto-body) ; -- 修改,所以点将移到文章开头
(插入“\n\n”);-- 并且将添加两个空行。
(message-goto-body)))) ; --
于 2011-12-09T23:25:41.387 回答