diff --git a/scheme/httpd/logging.scm b/scheme/httpd/logging.scm
index 45e7b65..5a0928b 100644
--- a/scheme/httpd/logging.scm
+++ b/scheme/httpd/logging.scm
@@ -164,6 +164,10 @@
 
 (define (maybe-dns-lookup remote-ip)
   (if (logging-dns-lookup?)
-      (or (dns-lookup-ip remote-ip)
+      (or (with-fatal-error-handler*
+	   (lambda (condition decline)
+	     remote-ip)
+	   (lambda ()
+	     (dns-lookup-ip remote-ip)))
 	  remote-ip)
       remote-ip))
\ No newline at end of file