[nongnu] elpa/geiser-gambit a6101d0 14/34: fixes autocompletion problem caused by bad choice of modules inclusion

[Philip Kaludercic]

branch: elpa/geiser-gambit
commit a6101d09ed7d09faaaf4d5b5845d26e1c14ff05a
Author: mathieu2em <math.per@hotmail.com>
Commit: mathieu2em <math.per@hotmail.com>

    fixes autocompletion problem caused by bad choice of modules inclusion
---
 elisp/geiser-gambit.el          | 4 ++--
 scheme/gambit/geiser/gambit.scm | 3 +--
 2 files changed, 3 insertions(+), 4 deletions(-)

diff --git a/elisp/geiser-gambit.el b/elisp/geiser-gambit.el
index cd68e46..b12fcb1 100644
--- a/elisp/geiser-gambit.el
+++ b/elisp/geiser-gambit.el
@@ -298,8 +298,8 @@ If `t', Geiser will use `next-error' to jump to the error's 
location."
   ;; else we go load the file in geiser
   (let* ((v (geiser-gambit--version (geiser-gambit--binary)))
          (gambit-version (substring v 1 (string-width v))))
-    (if (version< gambit-version "4.9.3")
-        `( ,(expand-file-name "gambit/geiser/gambit" geiser-scheme-dir) "-" )
+    (if (version< gambit-version "4.9.4")
+        `( ,(expand-file-name "gambit/geiser/gambit.scm" geiser-scheme-dir) 
"-" )
       `( "gambit/geiser" "-"))))
     
 
diff --git a/scheme/gambit/geiser/gambit.scm b/scheme/gambit/geiser/gambit.scm
index 8efab7b..74682f5 100644
--- a/scheme/gambit/geiser/gambit.scm
+++ b/scheme/gambit/geiser/gambit.scm
@@ -1,8 +1,7 @@
 ;; scheme
 ;;; gambit.scm gambit geiser interaction
 (##namespace ("gambit/geiser#")) ;; in gambit/geiser#
-(##include "~~lib/_prim#.scm")   ;; map fx+ to ##fx+, etc
-(##include "~~lib/_gambit#.scm") ;; for macro-check-string,
+(##include "~~lib/gambit#.scm") ;; for macro-check-string,
 ;; macro-absent-obj, etc
 
 (define-macro (geiser:capture-output x . xs)