From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/40576 Path: main.gmane.org!not-for-mail From: david.goldberg6@verizon.net (David S. Goldberg) Newsgroups: gmane.emacs.gnus.general Subject: gnus-summary-limit-to-author Date: Wed, 28 Nov 2001 11:08:43 -0500 Sender: owner-ding@hpc.uh.edu Message-ID: NNTP-Posting-Host: coloc-standby.netfonds.no Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-Trace: main.gmane.org 1035176106 1682 80.91.224.250 (21 Oct 2002 04:55:06 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Mon, 21 Oct 2002 04:55:06 +0000 (UTC) Return-Path: Original-Received: (qmail 6674 invoked from network); 28 Nov 2001 16:10:11 -0000 Original-Received: from malifon.math.uh.edu (mail@129.7.128.13) by mastaler.com with SMTP; 28 Nov 2001 16:10:11 -0000 Original-Received: from sina.hpc.uh.edu ([129.7.128.10] ident=lists) by malifon.math.uh.edu with esmtp (Exim 3.20 #1) id 1697HB-0004H8-00; Wed, 28 Nov 2001 10:09:33 -0600 Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Wed, 28 Nov 2001 10:09:19 -0600 (CST) Original-Received: from sclp3.sclp.com (qmailr@sclp3.sclp.com [209.196.61.66]) by sina.hpc.uh.edu (8.9.3/8.9.3) with SMTP id KAA00697 for ; Wed, 28 Nov 2001 10:09:06 -0600 (CST) Original-Received: (qmail 6665 invoked by alias); 28 Nov 2001 16:09:14 -0000 Original-Received: (qmail 6660 invoked from network); 28 Nov 2001 16:09:14 -0000 Original-Received: from smtpproxy2.mitre.org (128.29.154.90) by gnus.org with SMTP; 28 Nov 2001 16:09:14 -0000 Original-Received: from avsrv2.mitre.org (avsrv2.mitre.org [128.29.154.4]) by smtpproxy2.mitre.org (8.11.3/8.11.3) with ESMTP id fASG8kc06160 for ; Wed, 28 Nov 2001 11:08:46 -0500 (EST) Original-Received: from MAILHUB2 (mailhub2.mitre.org [129.83.221.18]) by smtpsrv2.mitre.org (8.11.3/8.11.3) with ESMTP id fASG8ja09148 for ; Wed, 28 Nov 2001 11:08:45 -0500 (EST) Original-Received: from blackbird.mitre.org (129.83.10.221) by mailhub2.mitre.org with SMTP id 8487199; Wed, 28 Nov 2001 11:08:43 -0500 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 Original-Lines: 38 User-Agent: Gnus/5.090004 (Oort Gnus v0.04) XEmacs/21.1 (Cuyahoga Valley, sparc-sun-solaris2.7) Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:40576 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:40576 --=-=-= Did a cvs update about four hours ago and found the subject function to throw an error on incorrect number of arguments. Looks like it happened in the most recent change to gnus-sum.el based on a cvs diff. The interactive function was changed to allow for both include and exclude by means of the prefix arg, but the resulting call tries to set up three arguments, but gnus-summary-limit-to-author only has one. The attached patch fixes the incorrect argument backtrace and I think provides the intended previous behavior of / a including the ability to exclude if current-prefix-arg. -- Dave Goldberg david.goldberg6@verizon.net --=-=-= Content-Type: text/x-patch Content-Disposition: inline Index: lisp/gnus-sum.el =================================================================== RCS file: /usr/local/cvsroot/gnus/lisp/gnus-sum.el,v retrieving revision 6.123 diff -u -r6.123 gnus-sum.el --- lisp/gnus-sum.el 2001/11/25 14:57:22 6.123 +++ lisp/gnus-sum.el 2001/11/28 16:06:22 @@ -6860,7 +6860,7 @@ (gnus-summary-limit articles)) (gnus-summary-position-point)))) -(defun gnus-summary-limit-to-author (from) +(defun gnus-summary-limit-to-author (from &optional header not-matching) "Limit the summary buffer to articles that have authors that match a regexp. If NOT-MATCHING, excluding articles that have authors that match a regexp." (interactive @@ -6868,7 +6868,7 @@ "Exclude author (regexp): " "Limit to author (regexp): ")) nil current-prefix-arg)) - (gnus-summary-limit-to-subject from "from")) + (gnus-summary-limit-to-subject from "from" not-matching)) (defun gnus-summary-limit-to-age (age &optional younger-p) "Limit the summary buffer to articles that are older than (or equal) AGE days. --=-=-=--