scsh-conservatory
/
sunet
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

In MAIN: use args parameter instead of command-line for directory; 

allows to start from within scsh manually
This commit is contained in:
interp 2004-05-12 19:59:43 +00:00
parent 84e22f065e
commit 5e12e7ec0e
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
start-surflet-server
View File

@ -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) (define (main args)
(with-cwd (with-cwd
(file-name-directory (car (command-line))) (file-name-directory (car args))
(let ((options (make-options-from-args (cdr args)))) (let ((options (make-options-from-args (cdr args))))
(cond ((zero? (user-uid)) (cond ((zero? (user-uid))
(set-gid (->gid "nobody")) (set-gid (->gid "nobody"))