From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/29299 Path: main.gmane.org!not-for-mail From: dsg@mitre.org (David S. Goldberg) Newsgroups: gmane.emacs.gnus.general Subject: Re: Small complaint about M-g Date: 23 Feb 2000 12:04:58 -0500 Sender: owner-ding@hpc.uh.edu Message-ID: References: <6eitzht09e.fsf@sloth.netpliance.net> NNTP-Posting-Host: coloc-standby.netfonds.no Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: main.gmane.org 1035165992 1950 80.91.224.250 (21 Oct 2002 02:06:32 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Mon, 21 Oct 2002 02:06:32 +0000 (UTC) Return-Path: Original-Received: from lisa.math.uh.edu (lisa.math.uh.edu [129.7.128.49]) by mailhost.sclp.com (Postfix) with ESMTP id C4126D051E for ; Wed, 23 Feb 2000 12:06:47 -0500 (EST) Original-Received: from sina.hpc.uh.edu (lists@Sina.HPC.UH.EDU [129.7.3.5]) by lisa.math.uh.edu (8.9.1/8.9.1) with ESMTP id LAB15013; Wed, 23 Feb 2000 11:05:45 -0600 (CST) Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Wed, 23 Feb 2000 11:05:13 -0600 (CST) Original-Received: from mailhost.sclp.com (postfix@sclp3.sclp.com [204.252.123.139]) by sina.hpc.uh.edu (8.9.3/8.9.3) with ESMTP id LAA19723 for ; Wed, 23 Feb 2000 11:05:01 -0600 (CST) Original-Received: from smtpproxy1.mitre.org (mbunix.mitre.org [129.83.20.100]) by mailhost.sclp.com (Postfix) with ESMTP id C3EDDD051E for ; Wed, 23 Feb 2000 12:05:01 -0500 (EST) Original-Received: from avsrv1.mitre.org (avsrv1.mitre.org [129.83.20.58]) by smtpproxy1.mitre.org (8.9.3/8.9.3) with ESMTP id MAA15174 for ; Wed, 23 Feb 2000 12:04:59 -0500 (EST) Original-Received: from linus.mitre.org (linus.mitre.org [129.83.10.1]) by smtpsrv1.mitre.org (8.9.3/8.9.3) with ESMTP id MAA18096 for ; Wed, 23 Feb 2000 12:04:53 -0500 (EST) Original-Received: from blackbird.mitre.org (blackbird [129.83.65.14]) by linus.mitre.org (8.9.3/8.9.3) with ESMTP id MAA23214 for ; Wed, 23 Feb 2000 12:04:59 -0500 (EST) Original-Received: (from dsg@localhost) by blackbird.mitre.org (8.9.3/8.9.3) id MAA19576; Wed, 23 Feb 2000 12:04:58 -0500 (EST) X-Authentication-Warning: blackbird.mitre.org: dsg set sender to dsg@mitre.org using -f Mail-Copies-To: never Original-To: The Gnus Mailing List X-Face: GUaHTH@nS>[7,ME@-gYZ4#Wl{z"99k@[[Y8AcP0x1paqu.,z9,XSV1WI>{q3f6^e5(zrit <4fV&VHhmE`uidRqtmG27;si9&r;#KSF~E#$%W8w(xdp)H4tW=\2XOk~3=@oGqqpj;m4xf Ow;y26396&,34@9#~4;@*S;E0cq"LM9N(us4P%F(Nxis'Vvfm9?KufH;:Q$dMa-QWGLR&K d0`LJZE8xb*>^yN>b]_NcU:E=Zn\1=#/(OS2 In-Reply-To: dsg@mitre.org's message of "23 Feb 2000 11:53:58 -0500" Original-Lines: 23 User-Agent: Gnus/5.0804 (Gnus v5.8.4) XEmacs/21.1 (Biscayne) Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:29299 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:29299 Damn I hate sending out stuff without sufficient testing. This fixes a couple of problems with it. The only bad thing now is that the "current" article is automatically selected after M-g. I only find this a minor annoyance since I nearly always have something selected when I type M-g anyway. YMMV. (defadvice gnus-summary-rescan-group (around save-marks activate) (gnus-uu-mark-all) (let ((dsg-current-article (gnus-summary-work-articles 1)) (dsg-mark-list (mapcar '(lambda (n) (cons n (gnus-summary-article-mark n))) (gnus-uu-get-list-of-articles nil))) (dsg-work-articles (gnus-summary-work-articles nil))) (mapcar '(lambda (n) (gnus-summary-mark-article n ?!)) dsg-work-articles) ad-do-it (mapcar '(lambda (n) (gnus-summary-mark-article (car n) (cdr n))) dsg-mark-list) (gnus-summary-goto-article (car dsg-current-article)))) -- Dave Goldberg (G022) dsg@mitre.org MS B325 Bedford x3887