diff options
| author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2010-09-05 03:33:52 +0200 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2010-09-05 03:33:52 +0200 |
| commit | 6c5ab9fbb37f6691395ddcc8b985819b7809cac4 (patch) | |
| tree | a0034a9e4611c8f5886f192ab6a10b99c4bd5367 | |
| parent | 8fa762ae053d6d2523e59f86c273f64cc421d8ad (diff) | |
| download | geiser-chez-6c5ab9fbb37f6691395ddcc8b985819b7809cac4.tar.gz geiser-chez-6c5ab9fbb37f6691395ddcc8b985819b7809cac4.tar.bz2 | |
Guile: fixes for compilation error regexps
| -rw-r--r-- | elisp/geiser-guile.el | 3 | ||||
| -rw-r--r-- | elisp/geiser-repl.el | 2 |
2 files changed, 2 insertions, 3 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 diff --git a/elisp/geiser-repl.el b/elisp/geiser-repl.el index b8bb86d..1c2a95a 100644 --- a/elisp/geiser-repl.el +++ b/elisp/geiser-repl.el @@ -83,7 +83,7 @@ implementation name gets appended to it." "Whether to forget old errors upon entering a new expression. When on (the default), every time a new expression is entered in -the REPL old error messages are flushed, and using [[next-error]] +the REPL old error messages are flushed, and using \\[next-error] afterwards will jump only to error locations produced by the new expression, if any." :type 'boolean |