[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[AUCTeX] Re: C-c ` pops to *output* buffer
From: |
Reiner Steib |
Subject: |
[AUCTeX] Re: C-c ` pops to *output* buffer |
Date: |
Sat, 26 Jan 2008 20:34:52 +0100 |
User-agent: |
Gnus/5.110007 (No Gnus v0.7) Emacs/22.1.50 (gnu/linux) |
On Sat, Jan 26 2008, David Reitter wrote:
> It actually happens with only pop-up-frames.
[...]
> Turns out the TeX-parse-function is only ever called from TeX-next-
> error, so changing TeX-parse-TeX should be a fairly safe thing to do.
It looks like several other caller of `TeX-pop-to-buffer' are wrong,
too. See the attached, untested patch (I don't feel comfortable to
commit it, because I rarely use AUCTeX and LaTeX at the moment).
Bye, Reiner.
Index: tex-buf.el
===================================================================
RCS file: /sources/auctex/auctex/tex-buf.el,v
retrieving revision 1.267
diff -u -r1.267 tex-buf.el
--- tex-buf.el 28 Dec 2007 10:33:42 -0000 1.267
+++ tex-buf.el 24 Jan 2008 21:32:51 -0000
@@ -238,7 +238,7 @@
(let ((buffer (TeX-active-buffer)))
(if buffer
(let ((old-buffer (current-buffer)))
- (TeX-pop-to-buffer buffer t t)
+ ;; (TeX-pop-to-buffer buffer t t)
(bury-buffer buffer)
(goto-char (point-max))
(recenter (if line
@@ -1138,9 +1138,9 @@
"Filter to process background output."
(let ((old-window (selected-window))
(pop-up-windows t))
- (TeX-pop-to-buffer "*TeX background*" nil t)
- (goto-char (point-max))
- (insert string)
+ (with-current-buffer "*TeX background*"
+ (goto-char (point-max))
+ (insert string))
(select-window old-window)))
;; Copy and adaption of `comint-postoutput-scroll-to-bottom' from CVS
@@ -1385,11 +1385,11 @@
already in an Emacs buffer) and the cursor is placed at the error."
(let ((old-buffer (current-buffer))
(default-major-mode major-mode))
- (TeX-pop-to-buffer (TeX-active-buffer) nil t)
- (if reparse
- (TeX-parse-reset))
- (goto-char TeX-error-point)
- (TeX-parse-error old-buffer)))
+ (with-current-buffer (TeX-active-buffer)
+ (if reparse
+ (TeX-parse-reset))
+ (goto-char TeX-error-point)
+ (TeX-parse-error old-buffer))))
;;; - Parsing (La)TeX
--
,,,
(o o)
---ooO-(_)-Ooo--- | PGP key available | http://rsteib.home.pages.de/