summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2013-04-13 00:03:54 +0200
committerJose Antonio Ortega Ruiz <jao@gnu.org>2013-04-13 00:03:54 +0200
commitd59b4b1ffe2892d918ad9354c7a0b28f5f30de5f (patch)
treee255194b549617b729eaec90d85b35bc66307bf5
parent65bc295b35beac42e410ae78a3077ce28f1e49a9 (diff)
downloadgeiser-guile-d59b4b1ffe2892d918ad9354c7a0b28f5f30de5f.tar.gz
geiser-guile-d59b4b1ffe2892d918ad9354c7a0b28f5f30de5f.tar.bz2
Racket: accepting spaces within comint's prompt
Since spaces are allowed inside filenames after all.
-rw-r--r--elisp/geiser-racket.el2
1 files changed, 1 insertions, 1 deletions
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