diff --git a/src/content.lisp b/src/content.lisp
index ea1db24..a19be2d 100644
--- a/src/content.lisp
+++ b/src/content.lisp
@@ -60,7 +60,7 @@
   (flet ((get-next-line (input)
            (string-trim '(#\Space #\Newline #\Tab) (read-line input nil))))
     (unless (string= (get-next-line stream) (separator *config*))
-      (error "The file lacks the expected header: ~a" (separator *config*)))
+      (error "The file, ~a, lacks the expected header: ~a" (file-namestring stream) (separator *config*)))
     (loop for line = (get-next-line stream)
        until (string= line (separator *config*))
        appending (parse-initarg line))))