# HG changeset patch
# User enz
# Date 968588992 -3600
# Node ID 8e350d558c98e8a9039c817739714d432e0e1b4a
# Parent  3e205fab11cba4a4b4153b08899ba24c7eeb2e64
[svn] Fixed a bug in Fetch_init, that triggered
an assertion if connection to remote server failed.

diff -r 3e205fab11cb -r 8e350d558c98 src/fetch.c
--- a/src/fetch.c	Sun Sep 10 12:33:42 2000 +0100
+++ b/src/fetch.c	Sun Sep 10 13:29:52 2000 +0100
@@ -1,7 +1,7 @@
 /*
   fetch.c
 
-  $Id: fetch.c 190 2000-08-09 21:20:12Z bears $
+  $Id: fetch.c 207 2000-09-10 12:29:52Z enz $
 */
 
 #if HAVE_CONFIG_H
@@ -329,7 +329,10 @@
 {
     Lock_closeDatabases();
     if ( ! connectToServ( serv ) )
+    {
+        Lock_openDatabases();
         return FALSE;
+    }
     Utl_cpyStr( fetch.serv, serv );
     fetch.ready = TRUE;
     return TRUE;