@@ -781,11 +781,11 @@
 ;; if 
 (define (configf:read-alist fname)
   (handle-exceptions
       exn
     (begin
-      (debug:print 0 *default-log-port* "read of alist " fname " failed. exn=" exn)
+      (debug:print-info 0 *default-log-port* "unable to read alist " fname ". exn=" exn)
       #f)
     (configf:alist->config
      (with-input-from-file fname read))))
 
 (define (configf:write-alist cdat fname)