diff options
author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2010-06-06 18:22:44 +0200 |
---|---|---|
committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2010-06-06 18:22:44 +0200 |
commit | d8aad434a66e5656b583d17a139da20ca52c3321 (patch) | |
tree | 969a8b6d2d59494d5474b8171c025f6a53b4bbf7 /scheme | |
parent | b5941ceec4fc06e3cdac0098ada3a561c476d627 (diff) | |
download | geiser-guile-d8aad434a66e5656b583d17a139da20ca52c3321.tar.gz geiser-guile-d8aad434a66e5656b583d17a139da20ca52c3321.tar.bz2 |
Guile: fix for finding locations of symbols in modules outside load path.
Diffstat (limited to 'scheme')
-rw-r--r-- | scheme/guile/geiser/evaluation.scm | 5 |
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) |