[nongnu] elpa/geiser-guile 2ea6d9d 204/284: Superior schemes

[Philip Kaludercic]

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

    Superior schemes
    
    Inferior schemes weren't really a good idea, were they? With remote
    connections one can launch an external scheme to debug Geiser anyway.
    And everything is (ahem, will be) simpler when we add new
    implementations.
---
 elisp/geiser-guile.el | 17 +++--------------
 1 file changed, 3 insertions(+), 14 deletions(-)

diff --git a/elisp/geiser-guile.el b/elisp/geiser-guile.el
index 687bf34..a53395d 100644
--- a/elisp/geiser-guile.el
+++ b/elisp/geiser-guile.el
@@ -262,18 +262,9 @@ it spawn a server thread."
                           `((,geiser-guile--path-rx 1
                                                     compilation-error-face)))
   (when remote
-    (geiser-repl--send-silent (geiser-guile--load-path-string))
-    (geiser-repl--send-silent ",use (geiser emacs)"))
-  (geiser-guile-update-warning-level)
-  )
-
-(defun geiser-guile--init-server-command ()
-  (comint-kill-region (point-min) (point-max))
-  (setq comint-prompt-regexp "inferior-guile> ")
-  (comint-send-string nil ",option prompt \"inferior-guile> \"\n")
-  (comint-send-string nil ",use (geiser emacs)\n")
-  (geiser-inf--wait-for-prompt 10000)
-  ",geiser-start-server")
+    (geiser-repl--send-silent (geiser-guile--load-path-string)))
+  (geiser-repl--send-silent ",use (geiser emacs)")
+  (geiser-guile-update-warning-level))
 
 
 ;;; Implementation definition:
@@ -283,8 +274,6 @@ it spawn a server thread."
   (arglist geiser-guile--parameters)
   (repl-startup geiser-guile--startup)
   (prompt-regexp geiser-guile--prompt-regexp)
-  (inferior-prompt-regexp geiser-guile--prompt-regexp)
-  (init-server-command geiser-guile--init-server-command)
   (debugger-prompt-regexp geiser-guile--debugger-prompt-regexp)
   (enter-debugger geiser-guile--enter-debugger)
   (marshall-procedure geiser-guile--geiser-procedure)