From 0b8b2b53dc801ee5cba4998471ce282338220bbf Mon Sep 17 00:00:00 2001
From: fredrik <fredrik@959494ce-11ee-0310-bf91-de5d638817bd>
Date: Wed, 11 Apr 2007 11:07:38 +0000
Subject: [PATCH] Allow #f for NULL host.

git-svn-id: svn+ssh://svn.dolda2000.com/srv/svn/repos/src/doldaconnect@891 959494ce-11ee-0310-bf91-de5d638817bd
---
 lib/guile/dolcon-guile.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/guile/dolcon-guile.c b/lib/guile/dolcon-guile.c
index 7a0f3e2..3ad21ff 100644
--- a/lib/guile/dolcon-guile.c
+++ b/lib/guile/dolcon-guile.c
@@ -30,7 +30,7 @@ static SCM scm_dc_connect(SCM host)
     
     if(fd >= 0)
 	dc_disconnect();
-    if(host == SCM_UNDEFINED)
+    if((host == SCM_UNDEFINED) || (host == SCM_BOOL_F))
     {
 	chost = NULL;
     } else {
-- 
2.11.0