Mercurial > emacs

changeset 97023:910ca036b4b6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(tex-compilation-parse-errors): Check for invalid filename strings when parsing tex errors (bug#376).
author Chong Yidong <cyd@stupidchicken.com>
date Fri, 25 Jul 2008 18:39:38 +0000
parents adb91820c13f
children c46e4c1d8339
files lisp/textmodes/tex-mode.el
diffstat 1 files changed, 6 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/textmodes/tex-mode.el	Fri Jul 25 18:39:27 2008 +0000
+++ b/lisp/textmodes/tex-mode.el	Fri Jul 25 18:39:38 2008 +0000
@@ -2188,6 +2188,7 @@
       (let* ((this-error (copy-marker begin-of-error))
 	     (linenum (string-to-number (match-string 1)))
 	     (error-text (regexp-quote (match-string 3)))
+	     try-filename
 	     (filename
 	      ;; Prefer --file-liner-error filename if we have it.
 	      (or errfilename
@@ -2195,7 +2196,11 @@
 		    (with-syntax-table tex-error-parse-syntax-table
 		      (backward-up-list 1)
 		      (skip-syntax-forward "(_")
-		      (while (not (file-readable-p (thing-at-point 'filename)))
+		      (while (not 
+			      (and (setq try-filename (thing-at-point
+						       'filename))
+				   (not (string= "" try-filename))
+				   (file-readable-p try-filename)))
 			(skip-syntax-backward "(_")
 			(backward-up-list 1)
 			(skip-syntax-forward "(_"))