break cycle

svn: r5488
This commit is contained in:
Eli Barzilay 2007-01-29 01:28:11 +00:00
parent 7bf793352c
commit aa685ff9c4

View File

@ -27,7 +27,10 @@
(error 'get-conf
"could not read conf (~a)"
config-file))])
(log-line "(re)loading configuration from ~a" config-file)
;; can't use log-line from logger, since it makes a cycle
(fprintf (current-error-port)
(format "(re)loading configuration from ~a"
config-file))
(with-input-from-file config-file read)))
(set! config-cache (make-hash-table)))))
(hash-table-get config-cache key