diff options
| -rw-r--r-- | haunt/reader.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/haunt/reader.scm b/haunt/reader.scm index 05aed8c..e1ab044 100644 --- a/haunt/reader.scm +++ b/haunt/reader.scm @@ -95,7 +95,7 @@ list must contain a matching reader for every post." (define sxml-reader (make-reader (make-file-extension-matcher "sxml") (lambda (file-name) - (let ((contents (load file-name))) + (let ((contents (load (absolute-file-name file-name)))) (values (alist-delete 'content contents eq?) (assq-ref contents 'content)))))) |