[nongnu] elpa/geiser-chibi 397ba42 13/38: Temporarily fix the symbol-module by appending (current-directory).

[Philip Kaludercic]

branch: elpa/geiser-chibi
commit 397ba423ca25fad7e547284a21fbc8c6378a0df6
Author: Lockywolf <lockywolf@gmail.com>
Commit: Lockywolf <lockywolf@gmail.com>

    Temporarily fix the symbol-module by appending (current-directory).
---
 scheme/chibi/geiser/geiser.scm | 5 +++--
 1 file 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 ) )