*** gnus-start.el~	Sun Nov 11 21:51:22 2007
--- gnus-start.el	Wed Nov 14 11:32:28 2007
***************
*** 2106,2112 ****
  			    (if (equal method gnus-select-method)
  				(gnus-make-hashtable
  				 (count-lines (point-min) (point-max)))
! 			      (gnus-make-hashtable 4096)))))))
      ;; Delete unnecessary lines.
      (goto-char (point-min))
      (cond
--- 2106,2113 ----
  			    (if (equal method gnus-select-method)
  				(gnus-make-hashtable
  				 (count-lines (point-min) (point-max)))
! 			      (gnus-make-hashtable 4096))))))
! 	group max min)
      ;; Delete unnecessary lines.
      (goto-char (point-min))
      (cond
***************
*** 2141,2148 ****
  		      (insert prefix)
  		      (zerop (forward-line 1)))))))
      ;; Store the active file in a hash table.
!     (goto-char (point-min))
!     (let (group max min)
        (while (not (eobp))
  	(condition-case ()
  	    (progn
--- 2142,2153 ----
  		      (insert prefix)
  		      (zerop (forward-line 1)))))))
      ;; Store the active file in a hash table.
!     ;; Use a unibyte buffer in order to make `read' read non-ASCII
!     ;; group names (which have been encoded) as unibyte strings.
!     (mm-with-unibyte-buffer
!       (insert-buffer-substring cur)
!       (setq cur (current-buffer))
!       (goto-char (point-min))
        (while (not (eobp))
  	(condition-case ()
  	    (progn