diff --git a/scheme/httpd/logging.scm b/scheme/httpd/logging.scm index 232915c..4021fe0 100644 --- a/scheme/httpd/logging.scm +++ b/scheme/httpd/logging.scm @@ -124,7 +124,7 @@ ; Files conform to CLF are expected to print the original line. (or http-code "-") (or filesize "-") - (if (string? referer) (string-trim referer char-set:whitespace) "") + (if (string? referer) (string-trim referer) "") (if (string? user-agent) (string-trim user-agent char-set:whitespace) "")))