From 1312f42a54252fa4378d7dfbd68591f9e6275c1a Mon Sep 17 00:00:00 2001
From: Jose Antonio Ortega Ruiz <jao@gnu.org>
Date: Sun, 1 Jul 2012 01:56:25 +0200
Subject: Correctly buttonizing paths with leading spaces in DBG buffers
Just adjusting a regexp.
---
elisp/geiser-edit.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
(limited to 'elisp')
diff --git a/elisp/geiser-edit.el b/elisp/geiser-edit.el
index 0fd3b89..2838c77 100644
--- a/elisp/geiser-edit.el
+++ b/elisp/geiser-edit.el
@@ -1,6 +1,6 @@
;;; geiser-edit.el -- scheme edit locations
-;; Copyright (C) 2009, 2010 Jose Antonio Ortega Ruiz
+;; Copyright (C) 2009, 2010, 2012 Jose Antonio Ortega Ruiz
;; This program is free software; you can redistribute it and/or
;; modify it under the terms of the Modified BSD License. You should
@@ -145,7 +145,7 @@ or following links in error buffers.")
'help-echo "Go to error location"))
(defconst geiser-edit--default-file-rx
- "^\\([^<>:\n\"]+\\):\\([0-9]+\\):\\([0-9]+\\)")
+ "^[ \t]*\\([^<>:\n\"]+\\):\\([0-9]+\\):\\([0-9]+\\)")
(defun geiser-edit--buttonize-files (&optional rx no-fill)
(let ((rx (or rx geiser-edit--default-file-rx))
--
cgit v1.2.3