CVSROOT: /cvsroot/auctex
Module name: auctex
Changes by: Ralf Angeli <angeli> 07/08/08 17:45:53
Index: tex-buf.el
===================================================================
RCS file: /cvsroot/auctex/auctex/tex-buf.el,v
retrieving revision 1.261
retrieving revision 1.262
diff -u -b -r1.261 -r1.262
--- tex-buf.el 10 Jul 2007 21:05:07 -0000 1.261
+++ tex-buf.el 8 Aug 2007 17:45:52 -0000 1.262
@@ -836,10 +836,13 @@
Return nil ifs no errors were found."
(save-excursion
(goto-char (point-max))
- (if (re-search-backward "^Output written on \\(.*\\) (\\([0-9]+\\) page"
+ (if (re-search-backward "^Output written on \\(.*?\\) (\\([0-9]+\\) page"
nil t)
(let ((output-file (TeX-match-buffer 1)))
(setq TeX-current-page (concat "{" (TeX-match-buffer 2) "}"))
+ ;; Shave off quotation marks if present.
+ (when (string-match "\\`\"\\(.*\\)\"\\'" output-file)
+ (setq output-file (match-string 1 output-file)))
(setq TeX-output-extension
(if (string-match "\\.\\([^.]*\\)$" output-file)
(match-string 1 output-file)
_______________________________________________
auctex-diffs mailing list
[EMAIL PROTECTED]
http://lists.gnu.org/mailman/listinfo/auctex-diffs
