From a6df381f547b61ccfb3c572246eb92d5b0839900 Mon Sep 17 00:00:00 2001
From: Jose Antonio Ortega Ruiz <jao@gnu.org>
Date: Mon, 19 Jul 2010 21:45:32 +0200
Subject: Guile: restoring (minimal) support for debugging REPL.

---
 elisp/geiser-guile.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/elisp/geiser-guile.el b/elisp/geiser-guile.el
index fb49085..7fae364 100644
--- a/elisp/geiser-guile.el
+++ b/elisp/geiser-guile.el
@@ -63,7 +63,8 @@ This function uses `geiser-guile-init-file' if it exists."
     ,@(and init-file (file-readable-p init-file) (list "-l" init-file)))))
 
 (defconst geiser-guile--prompt-regexp "^[^() \n]+@([^)]*?)> ")
-(defconst geiser-guile--debugger-prompt-regexp "[0-9]+ debug> *")
+(defconst geiser-guile--debugger-prompt-regexp
+  "^[^() \n]+@([^)]*?) \\[[0-9]+\\]> ")
 
 
 ;;; Evaluation support:
-- 
cgit v1.2.3