summaryrefslogtreecommitdiff
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
commit7a25131b95a71028fe3b83920a5cd9cf7f77ea7e (patch)
tree93461c991203ee4eb8db1866b5e0c97d90a7b067
parent0505bdee742ad80d4763e2c0f697a49b2662ac17 (diff)
downloadgeiser-guile-7a25131b95a71028fe3b83920a5cd9cf7f77ea7e.tar.gz
geiser-guile-7a25131b95a71028fe3b83920a5cd9cf7f77ea7e.tar.bz2
Guile: fixes for compilation error regexps
-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