From 5a60d56975a67facbea41cb97fb4903453bf0752 Mon Sep 17 00:00:00 2001 From: Alex Kost Date: Tue, 6 Oct 2015 20:30:16 +0300 Subject: emacs: Fix 'guix-devel-setup-repl'. Setting up guix ports needs to be done in Geiser REPL synchronously, otherwise this operation may not be finished before the further evaluating of guile code. * emacs/guix-guile.el (guix-guile-prompt?): New function. * emacs/guix-geiser.el (guix-geiser-eval-in-repl-synchronously): New function. * emacs/guix-devel.el (guix-devel-setup-repl): Use it. --- emacs/guix-guile.el | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'emacs/guix-guile.el') diff --git a/emacs/guix-guile.el b/emacs/guix-guile.el index 63322d7ed8..cd6c54d87e 100644 --- a/emacs/guix-guile.el +++ b/emacs/guix-guile.el @@ -88,6 +88,11 @@ PROC and ARGS should be strings." args " "))) +(defun guix-guile-prompt? (string) + "Return non-nil, if STRING contains a Guile prompt." + (or (string-match-p geiser-guile--prompt-regexp string) + (string-match-p geiser-guile--debugger-prompt-regexp string))) + (provide 'guix-guile) ;;; guix-guile.el ends here -- cgit 1.4.1