@@ -774,14 +774,14 @@
     ht))
 
 ;; if 
 (define (configf:read-alist fname)
   (handle-exceptions
-      exn
-      #f
-    (configf:alist->config
-     (with-input-from-file fname read))))
+   exn
+   #f
+   (configf:alist->config
+    (with-input-from-file fname read))))
 
 (define (configf:write-alist cdat fname)
   (if (not (common:faux-lock fname))
       (debug:print 0 *default-log-port* "INFO: Could not get lock on " fname))
   (let* ((dat  (configf:config->alist cdat))