From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/80604 Path: news.gmane.org!not-for-mail From: Eric Abrahamsen Newsgroups: gmane.emacs.gnus.general Subject: Re: article reply hook? Date: Fri, 25 Nov 2011 17:08:45 +0800 Message-ID: <8739dczi02.fsf@ericabrahamsen.net> References: <87bos16i5o.fsf@ericabrahamsen.net> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain X-Trace: dough.gmane.org 1322212223 14196 80.91.229.12 (25 Nov 2011 09:10:23 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Fri, 25 Nov 2011 09:10:23 +0000 (UTC) To: ding@gnus.org Original-X-From: ding-owner+M28887@lists.math.uh.edu Fri Nov 25 10:10:19 2011 Return-path: Envelope-to: ding-account@gmane.org Original-Received: from util0.math.uh.edu ([129.7.128.18]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1RTrnV-00042m-0W for ding-account@gmane.org; Fri, 25 Nov 2011 10:10:17 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.math.uh.edu) by util0.math.uh.edu with smtp (Exim 4.63) (envelope-from ) id 1RTrmX-0003CE-8l; Fri, 25 Nov 2011 03:09:17 -0600 Original-Received: from mx1.math.uh.edu ([129.7.128.32]) by util0.math.uh.edu with esmtps (TLSv1:AES256-SHA:256) (Exim 4.63) (envelope-from ) id 1RTrmV-0003C0-He for ding@lists.math.uh.edu; Fri, 25 Nov 2011 03:09:15 -0600 Original-Received: from quimby.gnus.org ([80.91.231.51]) by mx1.math.uh.edu with esmtps (TLSv1:AES256-SHA:256) (Exim 4.76) (envelope-from ) id 1RTrmR-0002rF-Qi for ding@lists.math.uh.edu; Fri, 25 Nov 2011 03:09:12 -0600 Original-Received: from lo.gmane.org ([80.91.229.12]) by quimby.gnus.org with esmtp (Exim 4.72) (envelope-from ) id 1RTrmO-0002Cw-QC for ding@gnus.org; Fri, 25 Nov 2011 10:09:08 +0100 Original-Received: from list by lo.gmane.org with local (Exim 4.69) (envelope-from ) id 1RTrmI-0003c1-OL for ding@gnus.org; Fri, 25 Nov 2011 10:09:02 +0100 Original-Received: from 114.241.167.214 ([114.241.167.214]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Fri, 25 Nov 2011 10:09:02 +0100 Original-Received: from eric by 114.241.167.214 with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Fri, 25 Nov 2011 10:09:02 +0100 X-Injected-Via-Gmane: http://gmane.org/ Original-Lines: 28 Original-X-Complaints-To: usenet@dough.gmane.org X-Gmane-NNTP-Posting-Host: 114.241.167.214 User-Agent: Gnus/5.110018 (No Gnus v0.18) Emacs/24.0.91 (gnu/linux) Cancel-Lock: sha1:v6864hQBHMCvV24zsKzmodEXdwI= X-Spam-Score: -4.9 (----) List-ID: Precedence: bulk Xref: news.gmane.org gmane.emacs.gnus.general:80604 Archived-At: On Fri, Nov 25 2011, Katsumi Yamaoka wrote: > Eric Abrahamsen wrote: >> I'm trying to create a hook that will automatically remove the tick mark >> (!) from a message when I reply to it. I assume there's already some >> sort of hook that's adding the 'R' mark to messages when I reply to >> them, and I'd like to add a rider to that. I don't see any appropriate >> hooks in `gnus-****-hook': does anyone know how I can do this? > > Some gnus*mark*hook's don't seem to be usable for such a purpose. > Instead, I was successful in advising the function, that marks > articles as replied, to delete tick marks. Here it is: > > (defadvice gnus-summary-mark-article-as-replied (after delete-ticked-marks > (article) activate) > "Delete ticked marks." > (dolist (art (if (listp article) article (list article))) > (when (gnus-summary-goto-subject art nil t) > (gnus-summary-mark-article nil gnus-read-mark t)))) > > If you want those articles to be marked with `E' instead of `R' > in auto-expirable groups, remove the last `t'. Very nice, thanks a lot! -- GNU Emacs 24.0.91.1 (i686-pc-linux-gnu, GTK+ Version 2.24.6) of 2011-11-07 on pelletnNo Gnus v0.18