diff options
Diffstat (limited to 'scheme/chibi/geiser/geiser.scm')
| -rw-r--r-- | scheme/chibi/geiser/geiser.scm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/scheme/chibi/geiser/geiser.scm b/scheme/chibi/geiser/geiser.scm index 5f9e25e..9218646 100644 --- a/scheme/chibi/geiser/geiser.scm +++ b/scheme/chibi/geiser/geiser.scm @@ -120,8 +120,9 @@ (define (geiser:module-location symbol-representing-module) (make-location - (find-module-file + (string-append (current-directory) "/" + (find-module-file (module-name->file (module-name - (find-module symbol-representing-module)))) + (find-module symbol-representing-module))))) 0 ) ) |