[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[AUCTeX-diffs] GNU AUCTeX branch, master, updated. c3a21f2c6a23f229c8080
From: |
Mosè Giordano |
Subject: |
[AUCTeX-diffs] GNU AUCTeX branch, master, updated. c3a21f2c6a23f229c8080dc55599d3df755e501f |
Date: |
Sat, 24 Dec 2016 18:45:49 +0000 (UTC) |
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "GNU AUCTeX".
The branch, master has been updated
via c3a21f2c6a23f229c8080dc55599d3df755e501f (commit)
from 061aaf57729482b1e5f2be43643e197f844df2f5 (commit)
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.
- Log -----------------------------------------------------------------
commit c3a21f2c6a23f229c8080dc55599d3df755e501f
Author: Mosè Giordano <address@hidden>
Date: Sat Dec 24 19:36:47 2016 +0100
Print only first line of the message in error overview
* tex-buf.el (TeX-error-overview-make-entries): Use `push' in place of
`add-to-list'. Print only the first line of the message.
diff --git a/tex-buf.el b/tex-buf.el
index 07bb78b..6497777 100644
--- a/tex-buf.el
+++ b/tex-buf.el
@@ -3429,8 +3429,7 @@ errors. If nil, defaults to
`TeX-error-overview-active-buffer'."
msg (nth 3 entry))
;; Add the entry only if it isn't to be skipped.
(unless (TeX-error-list-skip-warning-p type (nth 10 entry))
- (add-to-list
- 'entries
+ (push
(list
;; ID.
id
@@ -3458,15 +3457,22 @@ errors. If nil, defaults to
`TeX-error-overview-active-buffer'."
(t
""))
;; Message.
- (list (if (stringp msg) msg "")
+ (list (if (stringp msg)
+ ;; Sometimes, the message can be longer than one line,
+ ;; but print here only the first one.
+ (progn
+ (string-match "^.*" msg)
+ (match-string 0 msg))
+ "")
'face 'link
'follow-link t
'id id
- 'action 'TeX-error-overview-goto-source))) t))
+ 'action 'TeX-error-overview-goto-source)))
+ entries))
;; Increase the `id' counter in any case.
(setq id (1+ id)))
TeX-error-list)
- entries)))
+ (reverse entries))))
(defun TeX-error-overview-next-error (&optional arg)
"Move to the next line and find the associated error.
-----------------------------------------------------------------------
Summary of changes:
tex-buf.el | 16 +++++++++++-----
1 file changed, 11 insertions(+), 5 deletions(-)
hooks/post-receive
--
GNU AUCTeX
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [AUCTeX-diffs] GNU AUCTeX branch, master, updated. c3a21f2c6a23f229c8080dc55599d3df755e501f,
Mosè Giordano <=