From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/12068
Path: main.gmane.org!not-for-mail
From: wmperry@aventail.com (William M. Perry)
Newsgroups: gmane.emacs.gnus.general
Subject: Re: Quassia Gnus v0.4 is released
Date: 15 Sep 1997 07:28:42 -0700
Message-ID: <863en6zm5h.fsf@kramer.in.aventail.com>
References: <m267s3ecn9.fsf@proletcult.slip.ifi.uio.no>
Reply-To: wmperry@aventail.com
NNTP-Posting-Host: coloc-standby.netfonds.no
X-Trace: main.gmane.org 1035151671 1724 80.91.224.250 (20 Oct 2002 22:07:51 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Sun, 20 Oct 2002 22:07:51 +0000 (UTC)
Cc: ding@gnus.org
Return-Path: <ding-request@ifi.uio.no>
Original-Received: from xemacs.org (xemacs.cs.uiuc.edu [128.174.252.16])
	by altair.xemacs.org (8.8.7/8.8.7) with ESMTP id OAA03469
	for <steve@altair.xemacs.org>; Mon, 15 Sep 1997 14:31:35 -0700
Original-Received: from ifi.uio.no (0@ifi.uio.no [129.240.64.2])
	by xemacs.org (8.8.5/8.8.5) with SMTP id QAA20644
	for <steve@xemacs.org>; Mon, 15 Sep 1997 16:27:48 -0500 (CDT)
Original-Received: from claymore.vcinet.com (claymore.vcinet.com [208.205.12.23]) by ifi.uio.no with SMTP (8.6.11/ifi2.4) 
	id <QAA00884@ifi.uio.no> for <ding@ifi.uio.no> ; Mon, 15 Sep 1997 16:31:49 +0200
Original-Received: (qmail 12046 invoked by uid 504); 15 Sep 1997 14:31:08 -0000
Original-Received: (qmail 12043 invoked from network); 15 Sep 1997 14:31:08 -0000
Original-Received: from newman.aventail.com (root@199.238.236.1)
  by claymore.vcinet.com with SMTP; 15 Sep 1997 14:31:08 -0000
Original-Received: from kramer.in.aventail.com (wmperry@kramer.in.aventail.com [192.168.1.12])
	by newman.aventail.com (8.8.5/8.8.5) with ESMTP id HAA27916;
	Mon, 15 Sep 1997 07:30:58 -0700 (PDT)
Original-Received: (from wmperry@localhost)
	by kramer.in.aventail.com (8.8.5/8.8.5) id HAA14946;
	Mon, 15 Sep 1997 07:28:42 -0700
Original-To: Lars Magne Ingebrigtsen <larsi@ifi.uio.no>
Errors-to: wmperry@aventail.com
X-Face: O~Rn;(l][/-o1sALg4A@xpE:9-"'IR[%;,,!m7</SYF`{vYQ(&RI1&EiH[FvT;J}@f!4kfz
 x_!Y#=y{Uuj9GvUi=cPuajQ(Z42R[wE@{G,sn$qGr5g/wnb*"*ktI+,CD}1Z'wxrM2ag-r0p5I6\nA
 [WJopW_J.WY;
In-Reply-To: Lars Magne Ingebrigtsen's message of "15 Sep 1997 00:47:37 +0200"
Original-Lines: 47
X-Mailer: Quassia Gnus v0.4/XEmacs 20.3(beta19) - "Kiev"
Xref: main.gmane.org gmane.emacs.gnus.general:12068
X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:12068

Lars Magne Ingebrigtsen <larsi@ifi.uio.no> writes:

> Bug fixes and stuff.

I needed this patch to gnus-start.el... name collision with
gnus-draft-setup being defined in both gnus-start and gnus-draft.  So if
gnus-draft was already loaded (ie: your second invocation of 'gnus' in an
Emacs session) you would bomb out with an invalid # or arguments.

-Bill P.

*** gnus-start.el~	Sun Sep 14 12:25:48 1997
--- gnus-start.el	Mon Sep 15 07:33:27 1997
***************
*** 690,696 ****
  
  	  ;; Do the actual startup.
  	  (gnus-setup-news nil level dont-connect)
! 	  (gnus-draft-setup)
  	  ;; Generate the group buffer.
  	  (gnus-group-list-groups level)
  	  (gnus-group-first-unread-group)
--- 690,696 ----
  
  	  ;; Do the actual startup.
  	  (gnus-setup-news nil level dont-connect)
! 	  (gnus-maybe-create-draft-group)
  	  ;; Generate the group buffer.
  	  (gnus-group-list-groups level)
  	  (gnus-group-first-unread-group)
***************
*** 698,704 ****
  	  (gnus-group-set-mode-line)
  	  (run-hooks 'gnus-started-hook))))))
  
! (defun gnus-draft-setup ()
    "Make sure the draft group exists."
    (unless (gnus-gethash "nndraft:draft" gnus-newsrc-hashtb)
      (gnus-request-create-group "draft" '(nndraft ""))
--- 698,704 ----
  	  (gnus-group-set-mode-line)
  	  (run-hooks 'gnus-started-hook))))))
  
! (defun gnus-maybe-create-draft-group ()
    "Make sure the draft group exists."
    (unless (gnus-gethash "nndraft:draft" gnus-newsrc-hashtb)
      (gnus-request-create-group "draft" '(nndraft ""))