From 5e12e7ec0e99fce5f46f5c95a39c709ffabf65a8 Mon Sep 17 00:00:00 2001 From: interp Date: Wed, 12 May 2004 19:59:43 +0000 Subject: [PATCH] In MAIN: use args parameter instead of command-line for directory; allows to start from within scsh manually --- start-surflet-server | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/start-surflet-server b/start-surflet-server index 4b66895..4b74abe 100755 --- a/start-surflet-server +++ b/start-surflet-server @@ -138,7 +138,7 @@ exec scsh -lel SSAX-4.9/load.scm -lel sunet-2.1/load.scm -dm -o surflet-server - (define (main args) (with-cwd - (file-name-directory (car (command-line))) + (file-name-directory (car args)) (let ((options (make-options-from-args (cdr args)))) (cond ((zero? (user-uid)) (set-gid (->gid "nobody"))