diff options
| author | Yuchen Pei <id@ypei.org> | 2024-04-05 09:08:12 +1100 |
|---|---|---|
| committer | Yuchen Pei <id@ypei.org> | 2024-04-05 09:08:12 +1100 |
| commit | 5e5406f6b1b47b84591ee9dea4233164e9a55fb0 (patch) | |
| tree | 593e7eb9c4f3b0bc80c2e69718b97735cddad071 /emacs/.emacs.d/lisp/my/my-prog.el | |
| parent | 1843b1e8d19acf8688bbb7981d9d75eae4f1378b (diff) | |
[emacs] improve org backtrace region
Diffstat (limited to 'emacs/.emacs.d/lisp/my/my-prog.el')
| -rw-r--r-- | emacs/.emacs.d/lisp/my/my-prog.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/emacs/.emacs.d/lisp/my/my-prog.el b/emacs/.emacs.d/lisp/my/my-prog.el index bee132f..7e37611 100644 --- a/emacs/.emacs.d/lisp/my/my-prog.el +++ b/emacs/.emacs.d/lisp/my/my-prog.el @@ -255,7 +255,7 @@ Conversion is in a similar fashion to `my-org-backtrace-region'." (with-current-buffer (gdb-stack-buffer-name) (save-excursion (goto-char (point-min)) - (while (re-search-forward "^[0-9]+\\ +in \\(.*\\) of \\(.*\\)$" nil t) + (while (re-search-forward "^\\ *[0-9]+\\ +in \\(.*\\) of \\(.*\\)$" nil t) (setq func-name (match-string-no-properties 1) file-location (match-string-no-properties 2)) (push (concat "[[" file-location "][" func-name "]]") results)))) |