From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/44958 Path: main.gmane.org!not-for-mail From: Reiner Steib <4uce.02.r.steib@gmx.net> Newsgroups: gmane.emacs.gnus.general Subject: Patches and/or suggestions for article limiting Date: Sat, 25 May 2002 20:45:48 +0200 Sender: owner-ding@hpc.uh.edu Message-ID: Reply-To: reiner.steib@gmx.de NNTP-Posting-Host: localhost.gmane.org Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-Trace: main.gmane.org 1022352398 23270 127.0.0.1 (25 May 2002 18:46:38 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Sat, 25 May 2002 18:46:38 +0000 (UTC) Return-path: Original-Received: from malifon.math.uh.edu ([129.7.128.13]) by main.gmane.org with esmtp (Exim 3.33 #1 (Debian)) id 17BgYo-00063C-00 for ; Sat, 25 May 2002 20:46:38 +0200 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 17BgYQ-0000g8-00; Sat, 25 May 2002 13:46:14 -0500 Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Sat, 25 May 2002 13:46:29 -0500 (CDT) 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 NAA04293 for ; Sat, 25 May 2002 13:46:10 -0500 (CDT) Original-Received: (qmail 24422 invoked by alias); 25 May 2002 18:45:49 -0000 Original-Received: (qmail 24416 invoked from network); 25 May 2002 18:45:49 -0000 Original-Received: from theotp5.physik.uni-ulm.de (134.60.10.145) by gnus.org with SMTP; 25 May 2002 18:45:49 -0000 Original-Received: (from ste@localhost) by theotp5.physik.uni-ulm.de (8.11.2/8.11.2) id g4PIjm507795; Sat, 25 May 2002 20:45:48 +0200 X-Authentication-Warning: theotp5.physik.uni-ulm.de: ste set sender to reiner.steib@physik.uni-ulm.de using -f Original-To: ding@gnus.org Mail-Followup-To: ding@gnus.org X-Face: /U7=m^"/-Dn61mAl{g9e3>\G5Tp,oEX|V)g2I1hBk\ML;)7A?6cmB-y7y?'NA^J<=oz7syB =(McAwIHgLX!.B?R3X}98d@?>CrT094KLWh]WU4gDpnL/")MS(XoQTv`Oq225uL>+;CpPXo$N5e>N> $tPd-gbB^F{gQS#1ase]XO~D4p4M"3+F-7~u]dy3I?Pb8RO*H-EFeWDUf?Rf,d]pv\Jvh2Cht!A=im yKAS2Z%Ao^;}W/qzMvMm Original-Lines: 46 User-Agent: Gnus/5.090007 (Oort Gnus v0.07) Emacs/21.1 (i586-pc-linux-gnu) Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:44958 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:44958 --=-=-= Part 1: gnus-summary-limit-to-age `gnus-summary-limit-to-age' (`/ t') in the summary buffer prompts for a number with the string "Limit to articles within (in days): " or "Limit to articles older than (in days): " (with prefix argument `C-u / t'). Looking at the code I noted that it accepts negative arguments too in both cases, switching between older and younger [1]. WIBNI the prompt string would tell the user the possibility to enter negative numbers? Here's a patch against gnus-sum.el: --=-=-= Content-Type: text/x-patch Content-Disposition: attachment; filename=gnus-sum.el.patch Content-Description: prompt gnus-summary-limit-to-age --- gnu-sum.el.orig Wed May 22 14:03:30 2002 +++ gnu-sum.el Sat May 25 11:56:55 2002 @@ -7172,8 +7172,9 @@ days) (while (not days-got) (setq days (if younger - (read-string "Limit to articles within (in days): ") - (read-string "Limit to articles older than (in days): "))) + (read-string "Limit to articles younger than (in days, older when negative): ") + (read-string + "Limit to articles older than (in days, younger when negative): "))) (when (> (length days) 0) (setq days (read days))) (if (numberp days) --=-=-= Maybe the doc-string of `gnus-summary-limit-to-age' could mention negative numbers too? Part 2: And the menu text "Gnus/Limit to/Articles" (`/ n') might be changed. At least for me, the current label is inexpressively (of course limiting deals with articles, but with _which_ articles?). ,----[ C-h f gnus-summary-limit-to-articles RET ] | gnus-summary-limit-to-articles is an interactive compiled Lisp | function in `gnus-sum'. | (gnus-summary-limit-to-articles N) | | Limit the summary buffer to the next N articles. | If not given a prefix, use the process marked articles instead. `---- --=-=-= Content-Type: text/x-patch Content-Disposition: attachment; filename=gnus-sum.el.2.patch Content-Description: menu gnus-summary-limit-to-articles --- gnus-sum.el.orig Wed May 22 14:03:30 2002 +++ gnus-sum.el Sat May 25 12:29:58 2002 @@ -2231,7 +2231,7 @@ ["Display Predicate" gnus-summary-limit-to-display-predicate t] ["Unread" gnus-summary-limit-to-unread t] ["Non-dormant" gnus-summary-limit-exclude-dormant t] - ["Articles" gnus-summary-limit-to-articles t] + ["Next articles" gnus-summary-limit-to-articles t] ["Pop limit" gnus-summary-pop-limit t] ["Show dormant" gnus-summary-limit-include-dormant t] ["Hide childless dormant" --=-=-= Bye, Reiner. [1] As my lisp knowledge is quite limited: could someone review this? -- ,,, (o o) ---ooO-(_)-Ooo--- PGP key available via WWW http://rsteib.home.pages.de/ --=-=-=--