From 429eae07fdc1416084f35802a381a4a956b201d1 Mon Sep 17 00:00:00 2001 From: Andreas Seltenreich Date: Mon, 26 Jun 2006 07:15:34 +0000 Subject: [PATCH] * gnus.el (gnus-valid-select-methods): Declare nnweb with 'address. Since revision 6.95 (2003-01-05) of gnus-group.el, solid web groups are created using server names. If we use the feature without declaring it, Gnus does not properly manage server and group state. * nnweb.el (nnweb-google-search): Respect nnweb-max-hits as upper bound. --- lisp/ChangeLog | 10 ++++++++++ lisp/gnus.el | 2 +- lisp/nnweb.el | 3 ++- 3 files changed, 13 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 42fd87274..907e9ccb1 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,13 @@ +2006-06-26 Andreas Seltenreich + + * gnus.el (gnus-valid-select-methods): Declare nnweb with 'address. + Since revision 6.95 (2003-01-05) of gnus-group.el, solid web groups are + created using server names. If we use the feature without declaring + it, Gnus does not properly manage server and group state. + + * nnweb.el (nnweb-google-search): Respect nnweb-max-hits as upper + bound. + 2006-06-25 Andreas Seltenreich * gnus.el (gnus-find-method-for-group): On killed/unknown groups, try diff --git a/lisp/gnus.el b/lisp/gnus.el index 0db06f8ce..6fedd0dac 100644 --- a/lisp/gnus.el +++ b/lisp/gnus.el @@ -1667,7 +1667,7 @@ slower." ("nndraft" post-mail) ("nnfolder" mail respool address) ("nngateway" post-mail address prompt-address physical-address) - ("nnweb" none) + ("nnweb" address) ("nngoogle" post) ("nnslashdot" post) ("nnultimate" none) diff --git a/lisp/nnweb.el b/lisp/nnweb.el index 10297ddda..2f99d9d60 100644 --- a/lisp/nnweb.el +++ b/lisp/nnweb.el @@ -438,7 +438,8 @@ Valid types include `google', `dejanews', and `gmane'.") "?" (mm-url-encode-www-form-urlencoded `(("q" . ,search) - ("num" . "100") + ("num" . ,(number-to-string + (min 100 nnweb-max-hits))) ("hq" . "") ("hl" . "en") ("lr" . "") -- 2.25.1