From: Robert Pluim <rpluim@gmail.com>
To: emacs-devel@gnu.org
Cc: Andrew G Cohen <cohen@andy.bu.edu>
Subject: Re: master 69f20365543 1/4: Track article while moving between gnus groups
Date: Mon, 03 Apr 2023 14:36:30 +0200 [thread overview]
Message-ID: <87iledjg6p.fsf@gmail.com> (raw)
In-Reply-To: <20230401015834.8B6B6C13A8C@vcs2.savannah.gnu.org> (Andrew G. Cohen's message of "Fri, 31 Mar 2023 21:58:34 -0400 (EDT)")
>>>>> On Fri, 31 Mar 2023 21:58:34 -0400 (EDT), Andrew G Cohen <cohen@andy.bu.edu> said:
Andrew> branch: master
Andrew> commit 69f20365543f30263b9c6856071d5a8610490a24
Andrew> Author: Andrew G Cohen <cohen@andy.bu.edu>
Andrew> Commit: Andrew G Cohen <cohen@andy.bu.edu>
Andrew> Track article while moving between gnus groups
Andrew> * lisp/gnus/gnus-sum.el (gnus-current-move-article): New variable to
Andrew> track article while moving.
Andrew> (gnus-summary-move-article): Set gnus-current-move-article when
Andrew> moving/copying/crossposting or respooling.
Andrew> ---
Andrew> lisp/gnus/gnus-sum.el | 2 ++
Andrew> 1 file changed, 2 insertions(+)
Andrew> diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el
Andrew> index 0e81f95cd15..f13db8d9167 100644
Andrew> --- a/lisp/gnus/gnus-sum.el
Andrew> +++ b/lisp/gnus/gnus-sum.el
Andrew> @@ -1408,6 +1408,7 @@ the normal Gnus MIME machinery."
Andrew> (defvar gnus-newsgroup-adaptive-score-file nil)
Andrew> (defvar gnus-current-score-file nil)
Andrew> (defvar gnus-current-move-group nil)
Andrew> +(defvar gnus-current-move-article nil)
Andrew> (defvar gnus-current-copy-group nil)
Andrew> (defvar gnus-current-crosspost-group nil)
Andrew> (defvar gnus-newsgroup-display nil)
Andrew> @@ -10248,6 +10249,7 @@ ACTION can be either `move' (the default), `crosspost' or `copy'."
Andrew> article gnus-newsgroup-name (current-buffer) t)))
Andrew> ;; run the move/copy/crosspost/respool hook
Andrew> + (set (intern "gnus-current-move-article") (cdr art-group))
Whatʼs wrong with plain olʼ
(setq gnus-current-move-article (cdr art-group))
I assume thereʼs going to be a follow-up patch, because I didnʼt see
any changes actually using this new defvar.
Robert
--
next parent reply other threads:[~2023-04-03 12:36 UTC|newest]
Thread overview: 2+ messages / expand[flat|nested] mbox.gz Atom feed top
[not found] <168031431405.27241.5793818095256134688@vcs2.savannah.gnu.org>
[not found] ` <20230401015834.8B6B6C13A8C@vcs2.savannah.gnu.org>
2023-04-03 12:36 ` Robert Pluim [this message]
[not found] ` <20230401015834.A94D5C13A8E@vcs2.savannah.gnu.org>
2023-04-03 12:39 ` master 9acfb7662c5 2/4: Use completion when mark limiting in gnus summary buffers Robert Pluim
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.gnu.org/software/emacs/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=87iledjg6p.fsf@gmail.com \
--to=rpluim@gmail.com \
--cc=cohen@andy.bu.edu \
--cc=emacs-devel@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs.git
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 read-only IMAP folder(s) and NNTP newsgroup(s).