[GNUnet-SVN] r4111 - GNUnet/contrib

[grothoff]

Author: grothoff
Date: 2006-12-29 19:41:00 -0800 (Fri, 29 Dec 2006)
New Revision: 4111

Modified:
   GNUnet/contrib/config-daemon.scm
Log:
s

Modified: GNUnet/contrib/config-daemon.scm
===================================================================
--- GNUnet/contrib/config-daemon.scm    2006-12-30 03:19:51 UTC (rev 4110)
+++ GNUnet/contrib/config-daemon.scm    2006-12-30 03:41:00 UTC (rev 4111)
@@ -1269,8 +1269,8 @@
      (nobasiclimit (not (get-option ctx "LOAD" "BASICLIMITING")))
      (experimental (get-option ctx "Meta" "EXPERIMENTAL"))
      (f2f (string= (get-option ctx "MODULES" "topology") "topology_f2f") )
-     (tcp-port-nz (int= (get-option ctx "TCP" "PORT") 0) )
-     (udp-port-nz (int= (get-option ctx "UDP" "PORT") 0) )
+     (tcp-port-nz (eq? (get-option ctx "TCP" "PORT") 0) )
+     (udp-port-nz (eq? (get-option ctx "UDP" "PORT") 0) )
      (mysql (string= (get-option ctx "MODULES" "sqstore") "sqstore_mysql") )
      (fs-loaded (list? (member "fs" (string-split (get-option ctx "GNUNETD" 
"APPLICATIONS") #\  ) ) ) )
      (nat-loaded (list? (member "nat" (string-split (get-option ctx "GNUNETD" 
"TRANSPORTS") #\  ) ) ) )