diff options
author | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-11-19 17:13:20 +0000 |
---|---|---|
committer | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-11-19 17:31:08 +0000 |
commit | 456525f0c8e2cd39ad288462f7499391b925d529 (patch) | |
tree | 4cdd6fa6f35cc335fb2209390f7b4ac7b7ce20a5 /cider-stacktrace.el | |
parent | d7defbe1205f89363702d567c2e01419b1fec4e1 (diff) |
Fix error message regexp for building buttons
It's common for extra information to be added after the column number.
The previous regexp was including that information as part of the column
number.
Diffstat (limited to 'cider-stacktrace.el')
-rw-r--r-- | cider-stacktrace.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/cider-stacktrace.el b/cider-stacktrace.el index 97d286dd..b574c28a 100644 --- a/cider-stacktrace.el +++ b/cider-stacktrace.el @@ -513,7 +513,7 @@ This associates text properties to enable filtering and source navigation." Buttons span over the region from BEG to current point. MESSAGE is parsed to find line, col and buffer name to jump to." (when (and message - (string-match "\\([^:]+\\):\\([^:]+\\):\\([^:]+\\):\\([^:]+\\)\\'" message)) + (string-match "\\([^:]+\\):.*?\\([^: ]+\\):\\([^: ]+\\):\\([^: ]+\\)" message)) (let* ((line (string-to-number (match-string 3 message))) (col (string-to-number (match-string 4 message))) (buf-name (car (last (split-string (match-string 2 message) "\\/"))))) |