* [Gnus] Mark unseen articles
@ 2017-04-16 1:17 ernobe
2017-04-16 4:34 ` Eric Abrahamsen
2017-04-22 1:42 ` Emanuel Berg
0 siblings, 2 replies; 3+ messages in thread
From: ernobe @ 2017-04-16 1:17 UTC (permalink / raw)
To: help-gnu-emacs
Is there any way I can automatically mark all articles marked with the
gnus-unseen-mark with the gnus-unread-mark?
--
https://archive.org/services/purl/bahai
^ permalink raw reply [flat|nested] 3+ messages in thread
* Re: [Gnus] Mark unseen articles
2017-04-16 1:17 [Gnus] Mark unseen articles ernobe
@ 2017-04-16 4:34 ` Eric Abrahamsen
2017-04-22 1:42 ` Emanuel Berg
1 sibling, 0 replies; 3+ messages in thread
From: Eric Abrahamsen @ 2017-04-16 4:34 UTC (permalink / raw)
To: help-gnu-emacs
ernobe <ernobe@yahoo.com> writes:
> Is there any way I can automatically mark all articles marked with the
> gnus-unseen-mark with the gnus-unread-mark?
I don't think so, but you could build something like that out of a few
preliminary pieces. Note that "/ ." will limit to unseen articles, after
which you can mark all with "M P a", then mark as unread with "M-u".
Not particularly automatic, but you could get there from here...
^ permalink raw reply [flat|nested] 3+ messages in thread
* Re: [Gnus] Mark unseen articles
2017-04-16 1:17 [Gnus] Mark unseen articles ernobe
2017-04-16 4:34 ` Eric Abrahamsen
@ 2017-04-22 1:42 ` Emanuel Berg
1 sibling, 0 replies; 3+ messages in thread
From: Emanuel Berg @ 2017-04-22 1:42 UTC (permalink / raw)
To: help-gnu-emacs
ernobe wrote:
> Is there any way I can automatically mark all
> articles marked with the gnus-unseen-mark with
> the gnus-unread-mark?
You need a loop, a status check to see what it
is, a branch to determine what to do, and
a remark based on that.
Here is some Elisp to get you started. It will
require a rebuild tho because it is a function
to do something else, for sure.
Probably doing it manually or semi-manually
is faster unless you have a huge load or do
this every day.
But doing it with Elisp is always cooler :)
(defun gnus-summary-do-mark-region (char)
(interactive "c mark: ")
(save-excursion
(let ((start (region-beginning))
(end (region-end)) )
(goto-char start)
(beginning-of-line)
(while (< (point) end)
(gnus-summary-mark-article (gnus-summary-article-number) char)
(gnus-summary-find-next) ))))
(defun gnus-summary-mark-region ()
(interactive)
(when mark-active (call-interactively #'gnus-summary-do-mark-region) ))
--
underground experts united
http://user.it.uu.se/~embe8573
^ permalink raw reply [flat|nested] 3+ messages in thread
end of thread, other threads:[~2017-04-22 1:42 UTC | newest]
Thread overview: 3+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2017-04-16 1:17 [Gnus] Mark unseen articles ernobe
2017-04-16 4:34 ` Eric Abrahamsen
2017-04-22 1:42 ` Emanuel Berg
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.