Hello guys:
I was advised in TeX.sx to report the problem to the list, since it is an AucTeX
issue. At one point I mistakenly assumed it was ConTeXt failure.
By redefining the functions from TeX-command-show to TeX-command-default
the infinite loop calling ConTeXt stopped. Since the interactive call to
Viewer was not possible (C-c C-c), unless manually completing it, at
least the viewer was accessible this time around.
But, even though, the .tex file compiles successfully, it brings
tex-recenter-output-buffer so the output of the file could be seen.
At least by changing it to TeX-command-default, invoking C-c C-c
afterwards, brings the viewer.
;; Various
(defun TeX-ConTeXt-sentinel (process name)
"Cleanup TeX output buffer after running ConTeXt."
(cond ((TeX-TeX-sentinel-check process name))
((save-excursion
;; in a full ConTeXt run there will multiple texutil
;; outputs. Just looking for "another run needed" would
;; find the first occurence
(goto-char (point-max))
(re-search-backward "TeXUtil " nil t)
(re-search-forward "another run needed" nil t))
(message (concat "You should run ConTeXt again "
"to get references right, "
(TeX-current-pages)))
(setq TeX-command-next TeX-command-default)
((re-search-forward "removed files :" nil t)
(message "sucessfully cleaned up")
(re-search-forward "^ ?TeX\\(Exec\\|Util\\)" nil t) ;; strange regexp --pg
(message (concat name ": successfully formatted "
(TeX-current-pages)))
(setq TeX-command-next TeX-command-default))
(re-search-forward "^ ?TeX\\(Exec\\|Util\\)" nil t)
(t
(message (concat name ": problems after "
(TeX-current-pages)))
(setq TeX-command-next TeX-command-Show)))))
_______________________________________________
auctex mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/auctex
