Mercurial > hg > xemacs-beta
comparison lisp/gnus/nnfolder.el @ 140:585fb297b004 r20-2b4
Import from CVS: tag r20-2b4
| author | cvs |
|---|---|
| date | Mon, 13 Aug 2007 09:32:43 +0200 |
| parents | 7d55a9ba150c |
| children | 1856695b1fa9 |
comparison
equal
deleted
inserted
replaced
| 139:2b5203979d01 | 140:585fb297b004 |
|---|---|
| 511 (setq nnfolder-current-group group) | 511 (setq nnfolder-current-group group) |
| 512 (let (inf file) | 512 (let (inf file) |
| 513 ;; If we have to change groups, see if we don't already have the | 513 ;; If we have to change groups, see if we don't already have the |
| 514 ;; folder in memory. If we do, verify the modtime and destroy | 514 ;; folder in memory. If we do, verify the modtime and destroy |
| 515 ;; the folder if needed so we can rescan it. | 515 ;; the folder if needed so we can rescan it. |
| 516 (when (setq inf (assoc group nnfolder-buffer-alist)) | 516 (setq nnfolder-current-buffer |
| 517 (setq nnfolder-current-buffer (nth 1 inf))) | 517 (nth 1 (assoc group nnfolder-buffer-alist))) |
| 518 | 518 |
| 519 ;; If the buffer is not live, make sure it isn't in the alist. If it | 519 ;; If the buffer is not live, make sure it isn't in the alist. If it |
| 520 ;; is live, verify that nobody else has touched the file since last | 520 ;; is live, verify that nobody else has touched the file since last |
| 521 ;; time. | 521 ;; time. |
| 522 (when (and nnfolder-current-buffer | 522 (when (and nnfolder-current-buffer |