comparison lisp/gnus/nnfolder.el @ 144:318232e2a3f0 r20-2b6

Import from CVS: tag r20-2b6
author cvs
date Mon, 13 Aug 2007 09:34:14 +0200
parents 1856695b1fa9
children 59463afc5666
comparison
equal deleted inserted replaced
143:50e7fedfe353 144:318232e2a3f0
507 (push (list group (cons 1 0)) nnfolder-group-alist) 507 (push (list group (cons 1 0)) nnfolder-group-alist)
508 (nnmail-save-active nnfolder-group-alist nnfolder-active-file)) 508 (nnmail-save-active nnfolder-group-alist nnfolder-active-file))
509 509
510 (if dont-check 510 (if dont-check
511 (setq nnfolder-current-group group 511 (setq nnfolder-current-group group
512 nnfolder-current-folder nil) 512 nnfolder-current-buffer nil)
513 (let (inf file) 513 (let (inf file)
514 ;; If we have to change groups, see if we don't already have the 514 ;; If we have to change groups, see if we don't already have the
515 ;; folder in memory. If we do, verify the modtime and destroy 515 ;; folder in memory. If we do, verify the modtime and destroy
516 ;; the folder if needed so we can rescan it. 516 ;; the folder if needed so we can rescan it.
517 (setq nnfolder-current-buffer 517 (setq nnfolder-current-buffer