diff options
Diffstat (limited to 'gn/services/databases.scm')
| -rw-r--r-- | gn/services/databases.scm | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/gn/services/databases.scm b/gn/services/databases.scm index 91ac166..fbdf39e 100644 --- a/gn/services/databases.scm +++ b/gn/services/databases.scm @@ -34,7 +34,7 @@ (server-port virtuoso-configuration-server-port (default 1111)) (dirs-allowed virtuoso-dirs-allowed - (default "/var/genenetwork/virtuoso-data")) + (default (list "/var/genenetwork/virtuoso-data"))) (number-of-buffers virtuoso-configuration-number-of-buffers (default #f)) (maximum-dirty-buffers virtuoso-configuration-maximum-dirty-buffers @@ -54,6 +54,8 @@ (default "/var/lib/virtuoso/virtuoso.lck")) (transaction-file virtuoso-configuration-transaction-file (default "/var/lib/virtuoso/virtuoso.trx")) + (error-log-file virtuoso-configuration-error-log-file + (default "/var/lib/virtuoso/virtuoso-errors.log")) (syslog virtuoso-configuration-syslog (default "0"))) @@ -100,9 +102,9 @@ (format port "ServerPort = ~a:~a~%" #$(virtuoso-configuration-server-ip config) #$(virtuoso-configuration-server-port config))) - (when #$(virtuoso-dirs-allowed config) + (when #$(>= (length (virtuoso-dirs-allowed config)) 1) (format port "DirsAllowed = ~a~%" - #$(virtuoso-dirs-allowed config))) + #$(string-join (virtuoso-dirs-allowed config) ","))) (when #$(virtuoso-configuration-number-of-buffers config) (format port "NumberOfBuffers = ~a~%" #$(virtuoso-configuration-number-of-buffers config))) @@ -116,10 +118,11 @@ #$(virtuoso-configuration-http-server-ip config) #$(virtuoso-configuration-http-server-port config))) (format port - "[Database]~%DatabaseFile = ~a~%LockFile = ~a~%TransactionFile = ~a~%Syslog = ~a~%" + "[Database]~%DatabaseFile = ~a~%LockFile = ~a~%TransactionFile = ~a~%ErrorLogFile = ~a~%Syslog = ~a~%" #$(virtuoso-configuration-database-file config) #$(virtuoso-configuration-lock-file config) #$(virtuoso-configuration-transaction-file config) + #$(virtuoso-configuration-error-log-file config) #$(virtuoso-configuration-syslog config)))))) #:directory #$(virtuoso-configuration-state-directory config) #:user "virtuoso" |