diff --exclude=*.elc --exclude=*~ --exclude=*-[0-9] --exclude=gnus --exclude=readme --context --recursive pub/dgnus/lisp/gnus.el dgnus/lisp/gnus.el
*** pub/dgnus/lisp/gnus.el	Sat May 13 15:15:35 1995
--- dgnus/lisp/gnus.el	Sat May 13 15:20:27 1995
***************
*** 1376,1382 ****
  (defconst gnus-maintainer "gnus-bug@ifi.uio.no (The Gnus Bugfixing Girls & Boys)"
    "The mail address of the Gnus maintainer.")
  
! (defconst gnus-version "(ding) Gnus v0.68"
    "Version number for this version of Gnus.")
  
  (defvar gnus-info-nodes
--- 1376,1382 ----
  (defconst gnus-maintainer "gnus-bug@ifi.uio.no (The Gnus Bugfixing Girls & Boys)"
    "The mail address of the Gnus maintainer.")
  
! (defconst gnus-version "(ding) Gnus v0.69"
    "Version number for this version of Gnus.")
  
  (defvar gnus-info-nodes
***************
*** 11761,11767 ****
  
  (defun gnus-newsrc-to-gnus-format ()
    (setq gnus-newsrc-options "")
! 
    (let ((buf (current-buffer))
  	(already-read (> (length gnus-newsrc-alist) 1))
  	group level subscribed info options-symbol newsrc
--- 11761,11768 ----
  
  (defun gnus-newsrc-to-gnus-format ()
    (setq gnus-newsrc-options "")
!   (or gnus-active-hashtb
!       (setq gnus-active-hashtb (make-vector 4095 0)))
    (let ((buf (current-buffer))
  	(already-read (> (length gnus-newsrc-alist) 1))
  	group level subscribed info options-symbol newsrc