summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--scheme/guile/geiser/evaluation.scm5
1 files changed, 3 insertions, 2 deletions
diff --git a/scheme/guile/geiser/evaluation.scm b/scheme/guile/geiser/evaluation.scm
index 96d194b..7f2b8f7 100644
--- a/scheme/guile/geiser/evaluation.scm
+++ b/scheme/guile/geiser/evaluation.scm
@@ -56,8 +56,9 @@
(define ge:eval ge:compile)
(define (ge:compile-file path)
- "Compile a file, given its full @var{path}."
- (ge:compile `(load-compiled (compile-file ,path)) '(geiser evaluation)))
+ (ge:compile `(load-compiled (compile-file ,path
+ #:canonicalization 'absolute))
+ '(geiser evaluation)))
(define ge:load-file ge:compile-file)