* article reply hook?
@ 2011-11-25 2:38 Eric Abrahamsen
2011-11-25 7:57 ` Katsumi Yamaoka
0 siblings, 1 reply; 3+ messages in thread
From: Eric Abrahamsen @ 2011-11-25 2:38 UTC (permalink / raw)
To: ding
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?
Thanks,
Eric
--
GNU Emacs 24.0.91.1 (i686-pc-linux-gnu, GTK+ Version 2.24.6)
of 2011-11-07 on pellet
No Gnus v0.18
^ permalink raw reply [flat|nested] 3+ messages in thread
* Re: article reply hook?
2011-11-25 2:38 article reply hook? Eric Abrahamsen
@ 2011-11-25 7:57 ` Katsumi Yamaoka
2011-11-25 9:08 ` Eric Abrahamsen
0 siblings, 1 reply; 3+ messages in thread
From: Katsumi Yamaoka @ 2011-11-25 7:57 UTC (permalink / raw)
To: ding
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'.
^ permalink raw reply [flat|nested] 3+ messages in thread
* Re: article reply hook?
2011-11-25 7:57 ` Katsumi Yamaoka
@ 2011-11-25 9:08 ` Eric Abrahamsen
0 siblings, 0 replies; 3+ messages in thread
From: Eric Abrahamsen @ 2011-11-25 9:08 UTC (permalink / raw)
To: ding
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
^ permalink raw reply [flat|nested] 3+ messages in thread
end of thread, other threads:[~2011-11-25 9:08 UTC | newest]
Thread overview: 3+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2011-11-25 2:38 article reply hook? Eric Abrahamsen
2011-11-25 7:57 ` Katsumi Yamaoka
2011-11-25 9:08 ` Eric Abrahamsen
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).