[nongnu] elpa/geiser-guile a405f22 104/284: Guile: fix for file loading (we always compile them now).

[Philip Kaludercic]

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

    Guile: fix for file loading (we always compile them now).
---
 geiser/evaluation.scm | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/geiser/evaluation.scm b/geiser/evaluation.scm
index 3e44834..11438cf 100644
--- a/geiser/evaluation.scm
+++ b/geiser/evaluation.scm
@@ -60,11 +60,9 @@
 
 (define (ge:compile-file path)
   "Compile a file, given its full @var{path}."
-  (ge:compile `(compile-and-load ,path) '(geiser evaluation)))
+  (ge:compile `(load-compiled (compile-file ,path)) '(geiser evaluation)))
 
-(define (ge:load-file path)
-  "Load file, given its full @var{path}."
-  (ge:compile `(load-compiled ,(compiled-file-name path)) '(geiser 
evaluation)))
+(define ge:load-file ge:compile-file)
 
 (define (ge:macroexpand form . all)
   (let ((all (and (not (null? all)) (car all))))