From d59b4b1ffe2892d918ad9354c7a0b28f5f30de5f Mon Sep 17 00:00:00 2001 From: Jose Antonio Ortega Ruiz Date: Sat, 13 Apr 2013 00:03:54 +0200 Subject: Racket: accepting spaces within comint's prompt Since spaces are allowed inside filenames after all. --- elisp/geiser-racket.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/elisp/geiser-racket.el b/elisp/geiser-racket.el index 41262f9..4332cb7 100644 --- a/elisp/geiser-racket.el +++ b/elisp/geiser-racket.el @@ -97,7 +97,7 @@ This function uses `geiser-racket-init-file' if it exists." ,@(and init-file (file-readable-p init-file) (list "-f" init-file)) "-f" ,(expand-file-name "geiser/startup.rkt" rackdir)))) -(defconst geiser-racket--prompt-regexp "\\(mzscheme\\|racket\\)@[^ ]*?> ") +(defconst geiser-racket--prompt-regexp "\\(mzscheme\\|racket\\)@[^>]*?> ") (defun geiser-racket--startup (remote) (if geiser-image-cache-dir -- cgit v1.2.3