summaryrefslogtreecommitdiff
path: root/elisp/geiser-guile.el
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2010-09-05 03:33:52 +0200
committerJose Antonio Ortega Ruiz <jao@gnu.org>2010-09-05 03:33:52 +0200
commit6c5ab9fbb37f6691395ddcc8b985819b7809cac4 (patch)
treea0034a9e4611c8f5886f192ab6a10b99c4bd5367 /elisp/geiser-guile.el
parent8fa762ae053d6d2523e59f86c273f64cc421d8ad (diff)
downloadgeiser-chez-6c5ab9fbb37f6691395ddcc8b985819b7809cac4.tar.gz
geiser-chez-6c5ab9fbb37f6691395ddcc8b985819b7809cac4.tar.bz2
Guile: fixes for compilation error regexps
Diffstat (limited to 'elisp/geiser-guile.el')
-rw-r--r--elisp/geiser-guile.el3
1 files changed, 1 insertions, 2 deletions
diff --git a/elisp/geiser-guile.el b/elisp/geiser-guile.el
index 6086dd8..af9d589 100644
--- a/elisp/geiser-guile.el
+++ b/elisp/geiser-guile.el
@@ -170,8 +170,7 @@ This function uses `geiser-guile-init-file' if it exists."
(defun geiser-guile--startup ()
(set (make-local-variable 'compilation-error-regexp-alist)
`((,geiser-guile--path-rx geiser-guile--resolve-file-x)
- ("^ *\\([0-9]+\\): +" nil 1)
- ("at \\(/[^:\n]+\\):\\([[:digit:]]+\\):\\([[:digit:]]+\\)" 1 2 3)))
+ ("^ +\\([0-9]+\\):\\([0-9]+\\)" nil 1 2)))
(setq geiser-con--debugging-inhibits-eval nil)
(compilation-setup t)
(font-lock-add-keywords nil