From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Robert Pluim Newsgroups: gmane.emacs.devel Subject: Re: master 69f20365543 1/4: Track article while moving between gnus groups Date: Mon, 03 Apr 2023 14:36:30 +0200 Message-ID: <87iledjg6p.fsf@gmail.com> References: <168031431405.27241.5793818095256134688@vcs2.savannah.gnu.org> <20230401015834.8B6B6C13A8C@vcs2.savannah.gnu.org> Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="7552"; mail-complaints-to="usenet@ciao.gmane.io" Cc: Andrew G Cohen To: emacs-devel@gnu.org Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane-mx.org@gnu.org Mon Apr 03 14:37:21 2023 Return-path: Envelope-to: ged-emacs-devel@m.gmane-mx.org Original-Received: from lists.gnu.org ([209.51.188.17]) by ciao.gmane.io with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1pjJR2-0001gw-FJ for ged-emacs-devel@m.gmane-mx.org; Mon, 03 Apr 2023 14:37:20 +0200 Original-Received: from localhost ([::1] helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1pjJQL-0002Au-Jh; Mon, 03 Apr 2023 08:36:37 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1pjJQJ-0002AJ-JK for emacs-devel@gnu.org; Mon, 03 Apr 2023 08:36:35 -0400 Original-Received: from mail-wr1-x42e.google.com ([2a00:1450:4864:20::42e]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1pjJQI-0006Ua-0L for emacs-devel@gnu.org; Mon, 03 Apr 2023 08:36:35 -0400 Original-Received: by mail-wr1-x42e.google.com with SMTP id m2so29185840wrh.6 for ; Mon, 03 Apr 2023 05:36:33 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20210112; t=1680525392; h=content-transfer-encoding:mime-version:message-id:date :gmane-reply-to-list:references:in-reply-to:subject:cc:to:from:from :to:cc:subject:date:message-id:reply-to; bh=TZDWPbh4YA7O4x6mf/vVryJ0sucSULtDmqCslzC5Fu0=; b=GBXGP0QdgitCaMgeJojVa6t2U3V76tjkDMB/FzA+Nv8Yz06kTQFQ/P48GQ8a7ot9wU 7y76UIH3vDMsmQulKuVtIneRTEWnh1lzZnmwkIJKGFr9f24o+W6KmKscvtDGLNewFo2R U4kvXV8+YPFRYSGtWXWVNLZmi5uAu79gBSjiZNg+dojjlRUkSr6mGHehoN0hUCq2pufS B6p7cVSra4aZbDSufqYY2HREXUftMoY9x39QoxPoNrH3+2kc3+moAR8U4qJw/Z9rXBD+ Q31+BZRj31aUSn44Ol1cX2CA9LT71sHNKADphBytlkmnC4Qf5k/zik8vA0hB41DAQLQZ 7rFw== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20210112; t=1680525392; h=content-transfer-encoding:mime-version:message-id:date :gmane-reply-to-list:references:in-reply-to:subject:cc:to:from :x-gm-message-state:from:to:cc:subject:date:message-id:reply-to; bh=TZDWPbh4YA7O4x6mf/vVryJ0sucSULtDmqCslzC5Fu0=; b=lqPaAKDnCSUX0RrDiiwwjajttm2xBKsZt1yRSRFyekK/peod0ELcpspdJCZxvGhI0h LJ+bLWUWKInkf6EBLcM2qb1Kx6wlJHesDnJ4VeLWnUdKqlRrAFd5QTAoAharNKOxeo+P kymltE6uNCDRTsnBIXxIgeeKEtlwtvSKFEetEyYLzLrR1CMsQI7kWx2v+fO1e2EYGmx7 ssRhUIMCtWgypSCj6YBbEQl5fYwHvThlcHh+tUp53/xTV29elSEl5jpR7EfTsAjc7QJt ny/A0Wvm5Ukgb/0PPO6ojElf6jCYkAcT8M+XgXeYF0qDhMgjQBCGRJ/EnImtLxeCem6X oHpQ== X-Gm-Message-State: AAQBX9fC34Y5KvWIwIjvoYoS9Vl5OuDPh0/i/HoJq2ChhzIt6kwp+qzL uEIN6ij+kuPTsOyQyUIxq8l2Gai0WK4= X-Google-Smtp-Source: AKy350ZG1uRqi4XWF4hdgNQUfYaQfab6/N4Hy2g4vtdP1BSLFnARBK4bJWZyif+G7hcVU4wKnRvyag== X-Received: by 2002:adf:fc8e:0:b0:2d5:39d:514f with SMTP id g14-20020adffc8e000000b002d5039d514fmr27285028wrr.65.1680525391586; Mon, 03 Apr 2023 05:36:31 -0700 (PDT) Original-Received: from rltb ([82.66.8.55]) by smtp.gmail.com with ESMTPSA id o5-20020adfcf05000000b002c592535839sm9655671wrj.17.2023.04.03.05.36.30 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256); Mon, 03 Apr 2023 05:36:31 -0700 (PDT) In-Reply-To: <20230401015834.8B6B6C13A8C@vcs2.savannah.gnu.org> (Andrew G. Cohen's message of "Fri, 31 Mar 2023 21:58:34 -0400 (EDT)") Gmane-Reply-To-List: yes Received-SPF: pass client-ip=2a00:1450:4864:20::42e; envelope-from=rpluim@gmail.com; helo=mail-wr1-x42e.google.com X-Spam_score_int: -20 X-Spam_score: -2.1 X-Spam_bar: -- X-Spam_report: (-2.1 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1, DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1, FREEMAIL_FROM=0.001, RCVD_IN_DNSWL_NONE=-0.0001, SPF_HELO_NONE=0.001, SPF_PASS=-0.001 autolearn=ham autolearn_force=no X-Spam_action: no action X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane-mx.org@gnu.org Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane-mx.org@gnu.org Xref: news.gmane.io gmane.emacs.devel:305070 Archived-At: >>>>> On Fri, 31 Mar 2023 21:58:34 -0400 (EDT), Andrew G Cohen said: Andrew> branch: master Andrew> commit 69f20365543f30263b9c6856071d5a8610490a24 Andrew> Author: Andrew G Cohen Andrew> Commit: Andrew G Cohen Andrew> Track article while moving between gnus groups =20=20=20=20 Andrew> * lisp/gnus/gnus-sum.el (gnus-current-move-article): New va= riable 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 defaul= t), `crosspost' or `copy'." Andrew> article gnus-newsgroup-name (current-buffer) t))) =20 Andrew> ;; run the move/copy/crosspost/respool hook Andrew> + (set (intern "gnus-current-move-article") (cdr art-group)) What=CA=BCs wrong with plain ol=CA=BC (setq gnus-current-move-article (cdr art-group)) I assume there=CA=BCs going to be a follow-up patch, because I didn=CA=BCt = see any changes actually using this new defvar. Robert --=20