diff options
Diffstat (limited to 'scm/dictrans.scm')
| -rw-r--r-- | scm/dictrans.scm | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/scm/dictrans.scm b/scm/dictrans.scm index e84c116..ec87ad8 100644 --- a/scm/dictrans.scm +++ b/scm/dictrans.scm @@ -80,7 +80,9 @@ ;;;; <X>string</X>* ;;;; <T ID="string" />* ;;;; </NODE> -;=UPDPATH= + +;;; Tailor this statement to your needs if necessary. +;=GUILE_COMMENT=;(set! %load-path (cons "=GUILE_SITE=" %load-path)) (use-modules (xmltools xmltrans) (gamma sql) @@ -104,7 +106,8 @@ (define input-files '()) (define sysconf-dir "=SYSCONFDIR=") - +(define config-file-name "ellinika.conf") + ;;; Load the site defaults (let ((rc-file (string-append sysconf-dir "/" config-file-name))) (if (file-exists? rc-file) |