comparison lisp/gnus/nnfolder.el @ 151:59463afc5666 r20-3b2

Import from CVS: tag r20-3b2
author cvs
date Mon, 13 Aug 2007 09:37:19 +0200
parents 318232e2a3f0
children 85ec50267440
comparison
equal deleted inserted replaced
150:8ebb1c0f0f6f 151:59463afc5666
274 (nnfolder-possibly-change-group nil server) 274 (nnfolder-possibly-change-group nil server)
275 (nnmail-activate 'nnfolder) 275 (nnmail-activate 'nnfolder)
276 (when group 276 (when group
277 (unless (assoc group nnfolder-group-alist) 277 (unless (assoc group nnfolder-group-alist)
278 (push (list group (cons 1 0)) nnfolder-group-alist) 278 (push (list group (cons 1 0)) nnfolder-group-alist)
279 (nnmail-save-active nnfolder-group-alist nnfolder-active-file))) 279 (nnmail-save-active nnfolder-group-alist nnfolder-active-file)
280 (nnfolder-read-folder group)))
280 t) 281 t)
281 282
282 (deffoo nnfolder-request-list (&optional server) 283 (deffoo nnfolder-request-list (&optional server)
283 (nnfolder-possibly-change-group nil server) 284 (nnfolder-possibly-change-group nil server)
284 (save-excursion 285 (save-excursion