Use #f for DC server instead of $DCSERVER || localhost.
authorfredrik <fredrik@959494ce-11ee-0310-bf91-de5d638817bd>
Wed, 20 Jun 2007 01:09:28 +0000 (01:09 +0000)
committerfredrik <fredrik@959494ce-11ee-0310-bf91-de5d638817bd>
Wed, 20 Jun 2007 01:09:28 +0000 (01:09 +0000)
git-svn-id: svn+ssh://svn.dolda2000.com/srv/svn/repos/src/doldaconnect@1083 959494ce-11ee-0310-bf91-de5d638817bd

lib/guile/chatlog
lib/guile/hubmgr

index e81e11b..fdb0022 100755 (executable)
@@ -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)
index ebcdcb3..ec5e612 100755 (executable)
@@ -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)