# HG changeset patch
# User HIROSE Yuuji <yuuji@gentei.org>
# Date 1487674679 -32373
# Node ID f38293cfe5083724961140e1e668f307f05e4ee5
# Parent  2d9589a786d1105dade3e93835df85a9d83d9e58
Limit filename part to extension in an error log line.

diff -r 2d9589a786d1 -r f38293cfe508 yatexprc.el
--- a/yatexprc.el	Tue Feb 21 15:56:22 2017 +0859
+++ b/yatexprc.el	Tue Feb 21 19:57:32 2017 +0859
@@ -1251,8 +1251,11 @@
       (setq s
 	    (buffer-substring
 	     (progn (forward-char 1) (point))
-	     (progn (skip-chars-forward "^ \n" (point-end-of-line))
-		    (point))))
+	     (if (re-search-forward
+		  "\\.\\(tex\\|sty\\|ltx\\)\\>" nil (point-end-of-line))
+		 (match-end 0)
+	       (skip-chars-forward "^ \n" (point-end-of-line))
+	       (point))))
       (if (string= "" s) default s))))
       
 (defun YaTeX-put-nonstopmode ()