From ba932f095a7078d602802940f326216e85a847ce Mon Sep 17 00:00:00 2001 From: Jose Antonio Ortega Ruiz Date: Mon, 14 Feb 2011 06:10:50 +0100 Subject: Guile REPL: bug fix: correctly track debugging status We weren't tracking the "enter debugger" event correctly, and all evaluations in debug mode were failing. There's still (at least) another bug, because error navigation in backtraces seems broken. --- elisp/geiser-repl.el | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'elisp/geiser-repl.el') diff --git a/elisp/geiser-repl.el b/elisp/geiser-repl.el index cbaaf24..fd274a7 100644 --- a/elisp/geiser-repl.el +++ b/elisp/geiser-repl.el @@ -243,6 +243,9 @@ module command as a string") (geiser-repl--host) (geiser-repl--port))))) +(defun geiser-repl--update-debugging (txt) + (geiser-con--connection-update-debugging geiser-repl--connection txt)) + (defun geiser-repl--start-repl (impl address) (message "Starting Geiser REPL for %s ..." impl) (geiser-repl--to-repl-buffer impl) @@ -267,6 +270,10 @@ module command as a string") (geiser-repl--startup impl address) (geiser-repl--autodoc-mode 1) (geiser-company--setup geiser-repl-company-p) + (add-hook 'comint-output-filter-functions + 'geiser-repl--update-debugging + nil + t) (message "%s up and running!" (geiser-repl--repl-name impl)))) (defun geiser-repl--start-scheme (impl address prompt) -- cgit v1.2.3