Index: server.scm
==================================================================
--- server.scm
+++ server.scm
@@ -218,11 +218,11 @@
 			 (res '()))
 		(let* ((mod-time  (handle-exceptions
 				   exn
 				   (begin
 				     (print "failed to get modification time on " hed ", exn=" exn)
-				     (current-seconds)) ;; 0
+				     0 #;(current-seconds)) ;; 0
 				   (file-modification-time hed))) ;; default to *very* old so log gets ignored if deleted
 		       (down-time (- (current-seconds) mod-time))
 		       (serv-dat  (if (or (< num-serv-logs 10)
 				  	  (< down-time 900)) ;; day-seconds))
 				      (server:logf-get-start-info hed)