From: fredrik <fredrik@959494ce-11ee-0310-bf91-de5d638817bd>
Date: Wed, 20 Jun 2007 01:09:28 +0000 (+0000)
Subject: Use #f for DC server instead of $DCSERVER || localhost.
X-Git-Tag: 0.4~3
X-Git-Url: http://git.dolda2000.com/gitweb/?p=doldaconnect.git;a=commitdiff_plain;h=156fedc8c67e242084aae14307d4fb4bb3592020

Use #f for DC server instead of $DCSERVER || localhost.


git-svn-id: svn+ssh://svn.dolda2000.com/srv/svn/repos/src/doldaconnect@1083 959494ce-11ee-0310-bf91-de5d638817bd
---

diff --git a/lib/guile/chatlog b/lib/guile/chatlog
index e81e11b..fdb0022 100755
--- a/lib/guile/chatlog
+++ b/lib/guile/chatlog
@@ -87,8 +87,6 @@
 	      )
 	)
       )
-    (if (not dc-server) (set! dc-server (getenv "DCSERVER")))
-    (if (not dc-server) (set! dc-server "localhost"))
     (if (not log-dir) (set! log-dir (string-append (getenv "HOME") "/dc/chatlog")))
 
     (dc-c&l #t dc-server #t)
diff --git a/lib/guile/hubmgr b/lib/guile/hubmgr
index ebcdcb3..ec5e612 100755
--- a/lib/guile/hubmgr
+++ b/lib/guile/hubmgr
@@ -74,9 +74,6 @@
 
 (define (hubmgr-main args)
   (let ((dc-server #f))
-    (if (not dc-server) (set! dc-server (getenv "DCSERVER")))
-    (if (not dc-server) (set! dc-server "localhost"))
-    
     (set! hublist (read-hl))
     (logf "read ~a hubs" (length hublist))
     (dc-c&l #t dc-server #t)