Emacs Gnus:如何在回复中强制将签名置于底部/引用不足的消息中?
我使用Gnus 5.13处理电子邮件(在Mac OS X 10.7.2和emacs 24上)。我使用Emacs Gnus:如何在回复中强制将签名置于底部/引用不足的消息中?,emacs,gnus,Emacs,Gnus,我使用Gnus 5.13处理电子邮件(在Mac OS X 10.7.2和emacs 24上)。我使用gnus发布样式条目(上面的eval(set(设置局部变量'message cite reply position'))将点(光标)放置在回复中的消息顶部。这使我可以在顶部回复或内联回复(在我想回复的邮件之间)。不幸的是,上面的条目也将我的签名放在我想回复的邮件的顶部。如果我想在顶部回复,这没关系,但是如果我想在线回复,这是错误的。如何强制将签名置于我回复的邮件下 放弃对“message cite
gnus发布样式
条目(上面的eval(set(设置局部变量'message cite reply position'))
将点(光标)放置在回复中的消息顶部。这使我可以在顶部回复或内联回复(在我想回复的邮件之间)。不幸的是,上面的条目也将我的签名放在我想回复的邮件的顶部。如果我想在顶部回复,这没关系,但是如果我想在线回复,这是错误的。如何强制将签名置于我回复的邮件下 放弃对“message cite reply position”的修改,我已将以下内容添加到我的.gnus.el文件中,现在回复电子邮件或新闻帖子时,首先是被删除的消息,然后是我的签名,该点位于消息的开头
(eval-after-load "gnus-msg"
'(defun gnus-inews-yank-articles (articles)
(let (beg article yank-string)
(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))) -- Original
(message-goto-body) ; -- Modified, so point will be moved to beginning of article
(insert "\n\n") ; -- and two empty lines will be added.
(message-goto-body)))) ; --
(加载“gnus msg”后评估)
"(defun gnus inews yank articles)
(让(乞求物品拉绳)
(信息转到正文)
(while(setq文章(pop文章))
(何时(listp文章)
(第1篇文章)
第条(第0条)
(保存窗口漫游)
(设置缓冲区gnus摘要缓冲区)
(gnus摘要选择文章无无无文章)
(gnus摘要删除过程标记文章)
(gnus复制文章缓冲区nil-yank字符串)
(let((消息回复缓冲区gnus文章副本)
(邮件回复标题)
;标题被解码。
(使用当前缓冲区gnus文章副本)
(保留限制)
(收割台窄至收割台)
((()(""))
(留言原文)
(setq beg(或beg(标记t)))
(当文章
(插入“\n”))
(推动标记)
(goto char beg)原文
(消息转到正文);--已修改,所以该点将移至文章开头
(插入“\n\n”);--将添加两个空行。
(信息转到正文);——
亲爱的天使。谢谢两条评论:1)假设您回复包含签名的邮件,则回复中的签名将被删除。。。2) 如何在qutoed消息前插入一个空行呢?1)但Gnus内置函数也会出现这种情况。2) 我修改了以前的代码,在引用的消息之前添加了几行新行。