Moving default configuration file and giving it a nice prefix
svn: r6456
This commit is contained in:
parent
636e5bd9c1
commit
527717aa01
|
@ -21,7 +21,7 @@
|
||||||
(file-base-connection-timeout 30))
|
(file-base-connection-timeout 30))
|
||||||
(paths
|
(paths
|
||||||
(configuration-root "conf")
|
(configuration-root "conf")
|
||||||
(host-root "default-web-root")
|
(host-root ".")
|
||||||
(log-file-path "log")
|
(log-file-path "log")
|
||||||
(file-root "htdocs")
|
(file-root "htdocs")
|
||||||
(servlet-root ".")
|
(servlet-root ".")
|
|
@ -16,7 +16,7 @@
|
||||||
[default-configuration-table-path path?])
|
[default-configuration-table-path path?])
|
||||||
|
|
||||||
(define default-configuration-table-path
|
(define default-configuration-table-path
|
||||||
(build-path (collection-path "web-server") "default-configuration-table"))
|
(build-path (collection-path "web-server") "default-web-root" "configuration-table.ss"))
|
||||||
|
|
||||||
; read-configuration-table : path -> configuration-table
|
; read-configuration-table : path -> configuration-table
|
||||||
(define (read-configuration-table table-file-name)
|
(define (read-configuration-table table-file-name)
|
||||||
|
|
Loading…
Reference in New Issue
Block a user