diff --git a/scheme/httpd/seval.scm b/scheme/httpd/seval.scm
index 1d775de..e6c98f8 100644
--- a/scheme/httpd/seval.scm
+++ b/scheme/httpd/seval.scm
@@ -108,7 +108,8 @@
 	     (q (parse-html-form-query qs))		; and parse them up.
 	     (s (cond ((assoc "program" q) => cdr)
 		      (else (error "No program in entity body.")))))
-	(http-log "Seval sexp:~%~s~%" s)
+	(http-syslog (syslog-level debug)
+		     "Seval sexp:~%~s~%" s)
 	(read (make-string-input-port s)))))
    (else (http-error http-reply/bad-request req
 		     "No Content-length: field in POST request."))))