*** pub/sgnus/lisp/gnus.el Fri May 24 01:19:18 1996 --- sgnus/lisp/gnus.el Fri May 24 01:34:31 1996 *************** *** 1722,1728 **** "gnus-bug@ifi.uio.no (The Gnus Bugfixing Girls + Boys)" "The mail address of the Gnus maintainers.") ! (defconst gnus-version "September Gnus v0.92" "Version number for this version of Gnus.") (defvar gnus-info-nodes --- 1722,1728 ---- "gnus-bug@ifi.uio.no (The Gnus Bugfixing Girls + Boys)" "The mail address of the Gnus maintainers.") ! (defconst gnus-version "September Gnus v0.93" "Version number for this version of Gnus.") (defvar gnus-info-nodes *** pub/sgnus/lisp/nnbabyl.el Fri May 24 01:19:20 1996 --- sgnus/lisp/nnbabyl.el Fri May 24 01:34:15 1996 *************** *** 563,573 **** (when (and (re-search-backward (format "^X-Gnus-Newsgroup: %s:\\([0-9]+\\) " (caar alist)) nil t) ! (>= (setq number ! (string-to-number ! (buffer-substring ! (match-beginning 1) (match-end 1)))) ! (cdadar alist))) (setcdr (cadar alist) (1+ number))) (setq alist (cdr alist))) --- 563,573 ---- (when (and (re-search-backward (format "^X-Gnus-Newsgroup: %s:\\([0-9]+\\) " (caar alist)) nil t) ! (> (setq number ! (string-to-number ! (buffer-substring ! (match-beginning 1) (match-end 1)))) ! (cdadar alist))) (setcdr (cadar alist) (1+ number))) (setq alist (cdr alist))) *** pub/sgnus/lisp/ChangeLog Fri May 24 01:19:38 1996 --- sgnus/lisp/ChangeLog Fri May 24 01:34:14 1996 *************** *** 1,4 **** --- 1,11 ---- + Thu May 23 23:32:43 1996 Lars Magne Ingebrigtsen + + * nnbabyl.el (nnbabyl-read-mbox): Would bogously increase the + number in groups. + Thu May 23 21:06:47 1996 Lars Magne Ingebrigtsen + + * gnus.el: September Gnus v0.92 is released. * gnus-soup.el (gnus-soup-add-article): Would remove Xrefs from packet.