From aa685ff9c4e6eb62a038114b8506dc3b425c43ae Mon Sep 17 00:00:00 2001 From: Eli Barzilay Date: Mon, 29 Jan 2007 01:28:11 +0000 Subject: [PATCH] break cycle svn: r5488 --- collects/handin-server/private/config.ss | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/collects/handin-server/private/config.ss b/collects/handin-server/private/config.ss index bcccb68f45..7b9403fb3f 100644 --- a/collects/handin-server/private/config.ss +++ b/collects/handin-server/private/config.ss @@ -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