[nongnu] elpa/geiser-guile 19ed2c0 157/284: Guile: don't create empty modules before loading them

[Philip Kaludercic]

branch: elpa/geiser-guile
commit 19ed2c06ab66a4ef22e7695c06d09579b5dfa54a
Author: Jose Antonio Ortega Ruiz <jao@gnu.org>
Commit: Jose Antonio Ortega Ruiz <jao@gnu.org>

    Guile: don't create empty modules before loading them
---
 geiser/modules.scm | 9 +++------
 1 file changed, 3 insertions(+), 6 deletions(-)

diff --git a/geiser/modules.scm b/geiser/modules.scm
index 7ca18c9..f558579 100644
--- a/geiser/modules.scm
+++ b/geiser/modules.scm
@@ -47,12 +47,9 @@
 (define (module-location name)
   (make-location (module-path name) #f))
 
-(define (find-module module-name)
-  (and (module-name? module-name)
-       (or (nested-ref (resolve-module '() #f) module-name)
-           (let ((m (resolve-module module-name #f)))
-             (beautify-user-module! m)
-             m))))
+(define (find-module mod-name)
+  (and (module-name? mod-name)
+       (resolve-module mod-name #f #:ensure #f)))
 
 (define (module-path module-name)
   (and (module-name? module-name)