Re: time delay on news groups?

[David Moore <dmoore@UCSD.EDU>]

Mark Eichin <eichin@cygnus.com> writes:

> Has anyone come up with a way to configure gnus to not show news until
> iit has been visible for some amount of time?  I'm thinking in terms
> of making the spam-warfare out there more useful... if I delay reading
> a message in an alt group until it's been there for 12 or maybe 36
> hours, there's a fair chance that someone will have "retroactively
> moderated" it if necessary.

	Good idea, it can help with NoCeM propagation problems.  I'm not
sure what you'd want to do in the group buffer, but in the subject
buffer, you could limit the summary to articles older than X days:


(defun gnus-summary-limit-to-age (age &optional younger-p)
  "If YOUNGER-P is nil, limit the summary buffer to articles that are older than (or equal) AGE days.  Otherwise, limit the summary buffer to articles that are younger than AGE days."
  (interactive "nTime in days: ")
  (prog1
      (let ((data gnus-newsgroup-data)
	    (cutoff (nnmail-days-to-time age))
	    articles d date is-younger)
	(while (setq d (pop data))
	  (when (and (vectorp (gnus-data-header d))
		     (setq date (mail-header-date (gnus-data-header d))))
	    (setq is-younger (nnmail-time-less
			      (nnmail-time-since (nnmail-date-to-time date))
			      cutoff))
	    (when (if younger-p is-younger (not is-younger))
	      (push (gnus-data-number d) articles))))
	(gnus-summary-limit (nreverse articles)))
    (gnus-summary-position-point)))


You could bind to something like '/ t' in the summary buffer.  Or it
might work in your gnus-summary-prepare-hook, but I haven't tested that.

-- 
David Moore <dmoore@ucsd.edu>       | Computer Systems Lab      __o
UCSD Dept. Computer Science - 0114  | Work: (619) 534-8604    _ \<,_
La Jolla, CA 92093-0114             | Fax:  (619) 534-1445   (_)/ (_)
<URL:http://oj.egbt.org/dmoore/>    | Solo Furnace Creek 508 -- 1996!