@@ -412,14 +412,13 @@
 							      ((d) 86400)
 							      ((w) 604800)
 							      ((M) 2628000) ;; aproximately one month
 							      ((y) 31536000)
 							      (else
-							       0)))))))
-		      ;; (print "ERROR: can't parse timestring "tstr", component "part)
-		      ;; can't (yet) use debugprint. rely on -show-config for user to find errors
-		      )))
+							       0)))))
+			    (debug:print 0 *default-log-port* "ERROR: can't parse timestring "tstr", component "part", string: "(cadr match))))
+		      (debug:print 0 *default-log-port* "ERROR: can't parse timestring "tstr", component "part))))
 	      parts)
     time-secs))
 		       
 (define (seconds->hr-min-sec secs)
   (let* ((hrs (quotient secs 3600))