Make it a bit more portable.
Change default port from webcache to http-alt.
This commit is contained in:
parent
73dfefd439
commit
25fa9fbca5
|
@ -1,12 +1,13 @@
|
|||
#!/bin/sh
|
||||
echo "Loading..."
|
||||
fullpath=`which $0`
|
||||
# $sunet is either $SUNETHOME or created out of fullpath
|
||||
# Kind of a hack, I know.
|
||||
sunet=${SUNETHOME:-`dirname $fullpath`/../..}
|
||||
ssax=${SSAXPATH:-$sunet/SSAX} # path to SSAX
|
||||
# $sunet is either $SUNET or created out of fullpath
|
||||
# Kind of a hack, I know. We're still waiting for this library
|
||||
#installing system.
|
||||
sunethome=${SUNET:-`dirname $fullpath`/../..}
|
||||
ssaxhome=${SSAX:-`dirname $fullpath`/../../../SSAX} # path to SSAX
|
||||
|
||||
exec scsh -lm $sunet/packages.scm -lm $ssax/lib/packages.scm -lm $sunet/httpd/surflets/packages.scm -dm -o surflet-server -e main -s "$0" "$@"
|
||||
exec scsh -lm $sunethome/packages.scm -lm $ssaxhome/lib/packages.scm -lm $sunethome/httpd/surflets/packages.scm -dm -o surflet-server -e main -s "$0" "$@"
|
||||
!#
|
||||
|
||||
(define-structure surflet-server
|
||||
|
@ -38,7 +39,7 @@ exec scsh -lm $sunet/packages.scm -lm $ssax/lib/packages.scm -lm $sunet/httpd/su
|
|||
htdocs-dir directory of html files (default: ./web-server/root/htdocs)
|
||||
surflet-dir directory of SUrflet files (default: ./web-server/root/surflets)
|
||||
images-dir directory of images files (default: ./web-server/root/img)
|
||||
port port server is listening to (default: 8080)
|
||||
port port server is listening to (default: 8008)
|
||||
log-file-name directory where to store the logfile in CLF
|
||||
(default: ./web-server/httpd.log)
|
||||
requests maximal amount of simultaneous requests (default 5)
|
||||
|
@ -61,7 +62,7 @@ exec scsh -lm $sunet/packages.scm -lm $ssax/lib/packages.scm -lm $sunet/httpd/su
|
|||
(set! htdocs-dir "./web-server/root/htdocs")
|
||||
(set! images-dir "./web-server/root/img")
|
||||
; (set! cgi-bin-dir "./web-server/root/cgi-bin")
|
||||
(set! port "8088")
|
||||
(set! port "8008")
|
||||
(set! log-file-name "./web-server/httpd.log")
|
||||
(set! root "./web-server/root")
|
||||
(set! surflet-dir "./web-server/root/surflets")
|
||||
|
|
Loading…
Reference in New Issue