Fix compile filters

master
Jacopo De Simoi 5 years ago
parent d2d0985d77
commit 0b3d6feecc
  1. 10
      misc/latex-compile-filters.el

@ -45,7 +45,7 @@
(defun ff/compilation-LaTeX-filter ()
(interactive)
(save-excursion
(goto-char (point-min))
(goto-char compilation-filter-start)
(setq buffer-read-only nil)
(while (re-search-forward "^LaTeX Warning: " nil t)
(while (not (re-search-forward "\\.$" (line-end-position) t))
@ -53,15 +53,15 @@
(delete-char 1)
(beginning-of-line)))
;; Cleanup avail lists so that the error parser does not get confused
(goto-char (point-min))
(if (search-forward " avail lists: " nil t)
(delete-char -2))
(setq buffer-read-only t)))
(add-hook 'compilation-filter-hook 'ff/compilation-LaTeX-filter)
(require 'compile)
(add-to-list 'compilation-error-regexp-alist 'latex-warning)
(add-to-list 'compilation-error-regexp-alist-alist
'(latex-warning

Loading…
Cancel
Save