diff options
-rw-r--r-- | examples/whoisd.scm | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/examples/whoisd.scm b/examples/whoisd.scm index 31a7fd9..7cce910 100644 --- a/examples/whoisd.scm +++ b/examples/whoisd.scm @@ -316,8 +316,6 @@ The following options may be used in daemon mode only:\n\ (set! whoisd-uid (vector-ref pwd 2)) (set! whoisd-gid (vector-ref pwd 3))) -(case whois-standalone - ((#t) - (whois-daemon)) - ((#f) - (whois-server (current-input-port) (current-output-port)))) +(if whois-standalone + (whois-daemon) + (whois-server (current-input-port) (current-output-port))) |