nnfolder reading problem in sgnus 0.61 "solved"

nnfolder reading problem in sgnus 0.61 "solved"

[Jan Vroonhof]

Below is a patch which allows me to read subscribed nnfolder groups
again. Before I only could read the by going to the server buffer and
read them as killed groups in the browse server list.

I think the problem is the fact nnfolder-server-close now always kills
the buffer (I think the comment should also relect that fact) combined
with some optimization? in nnfolder-read-articles
introduced in september as opposed to 5.0.15.

*** nnfolder.el.orig	Fri Mar 29 10:40:15 1996
--- nnfolder.el	Tue Apr  2 12:55:58 1996
***************
*** 110,116 ****
      (erase-buffer)
      (let ((delim-string (concat "^" rmail-unix-mail-delimiter))
  	  article art-string start stop)
!       (when nnfolder-current-buffer
  	(nnfolder-possibly-change-group newsgroup server)
  	(set-buffer nnfolder-current-buffer)
  	(goto-char (point-min))
--- 110,120 ----
      (erase-buffer)
      (let ((delim-string (concat "^" rmail-unix-mail-delimiter))
  	  article art-string start stop)
! ;;  
! ;;  why is this check here? nnfolder-current-buffer is 'nil' for me
! ;;  when trying to read messages in a group
! ;;      removed it for the moment (vroonhof@math.ethz.ch)
!       (when  t ;; nnfolder-current-buffer
  	(nnfolder-possibly-change-group newsgroup server)
  	(set-buffer nnfolder-current-buffer)
  	(goto-char (point-min))


That should make sgnus rise up to its true glory again.

Jan

-- 
Jan Vroonhof                    http://www.math.ethz.ch/~vroonhof/          
Mathematik,                                  vroonhof@math.ethz.ch
HG E16, ETH-Zentrum,                      Tel: +41-1-6325456/25154
Raemistrasse 101, CH-8092 Zuerich.              Fax: +41-1-6321085