From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/24565 Path: main.gmane.org!not-for-mail From: Rui Zhu Newsgroups: gmane.emacs.gnus.general Subject: Non-intuitiveness of `/ t' in summary buffer. Date: 01 Aug 1999 00:27:52 +0200 Sender: owner-ding@hpc.uh.edu Message-ID: <87iu70v4if.fsf@cs.tu-berlin.de> NNTP-Posting-Host: coloc-standby.netfonds.no Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-Trace: main.gmane.org 1035162109 9401 80.91.224.250 (21 Oct 2002 01:01:49 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Mon, 21 Oct 2002 01:01:49 +0000 (UTC) Return-Path: Original-Received: from farabi.math.uh.edu (farabi.math.uh.edu [129.7.128.57]) by sclp3.sclp.com (8.8.5/8.8.5) with ESMTP id TAA07499 for ; Sat, 31 Jul 1999 19:02:31 -0400 (EDT) Original-Received: from sina.hpc.uh.edu (lists@Sina.HPC.UH.EDU [129.7.3.5]) by farabi.math.uh.edu (8.9.3/8.9.3) with ESMTP id RAB26782; Sat, 31 Jul 1999 17:53:54 -0500 (CDT) Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Sat, 31 Jul 1999 17:54:32 -0500 (CDT) Original-Received: from sclp3.sclp.com (root@sclp3.sclp.com [204.252.123.139]) by sina.hpc.uh.edu (8.9.3/8.9.3) with ESMTP id RAA07804 for ; Sat, 31 Jul 1999 17:54:20 -0500 (CDT) Original-Received: from mail.cs.tu-berlin.de (root@mail.cs.tu-berlin.de [130.149.17.13]) by sclp3.sclp.com (8.8.5/8.8.5) with ESMTP id SAA07321 for ; Sat, 31 Jul 1999 18:51:52 -0400 (EDT) Original-Received: from monoid (mail@130-149-145-194.dialup.cs.tu-berlin.de [130.149.145.194]) by mail.cs.tu-berlin.de (8.9.1/8.9.1) with ESMTP id AAA16858 for ; Sun, 1 Aug 1999 00:49:38 +0200 (MET DST) Original-Received: from zhurui by monoid with local (Exim 2.05 #1 (Debian)) id 11Ahbd-0001A6-00; Sun, 1 Aug 1999 00:27:53 +0200 Original-To: ding@gnus.org Original-Lines: 10 User-Agent: Gnus/5.070095 (Pterodactyl Gnus v0.95) Emacs/20.3 Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:24565 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:24565 --=-=-= `C-u / t' always asks me "Old than...", it may be the limitation of `interactive' (or not? I'm not very familiar with elisp). Here is my patch for that, hoping it is useful. Regards, Rui --=-=-= Content-Type: text/x-patch Content-Disposition: attachment; filename=gnus-sum.el.patch Content-Description: patch for `gnus-summary-limit-to-age' --- gnus-sum.el.dist Fri Jul 9 21:16:21 1999 +++ gnus-sum.el Sun Jul 25 02:40:06 1999 @@ -6174,7 +6174,21 @@ "Limit the summary buffer to articles that are older than (or equal) AGE days. If YOUNGER-P (the prefix) is non-nil, limit the summary buffer to articles that are younger than AGE days." - (interactive "nLimit to articles older than (in days): \nP") + (interactive + (let ((younger current-prefix-arg) + (days-got nil) + days) + (while (not days-got) + (setq days (if younger + (read-string "Limit to articles within (in days): ") + (read-string "Limit to articles old than (in days): "))) + (when (> (length days) 0) + (setq days (read days))) + (if (numberp days) + (setq days-got t) + (message "Please enter a number.") + (sleep-for 1))) + (list days younger))) (prog1 (let ((data gnus-newsgroup-data) (cutoff (days-to-time age)) --=-=-= --=-=-=--