mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-28 07:45:00 +00:00
Code Issues Releases Activity

* lisp/textmodes/reftex-toc.el (reftex-re-enlarge): Demote errors.

Browse Source
This commit is contained in:
Stefan Monnier 2017-02-28 11:15:24 -05:00
parent 0fa5941727
commit 122d2d675c
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/textmodes/reftex-toc.el
View File

@ -380,13 +380,17 @@ SPC=view TAB=goto RET=goto+hide [q]uit [r]escan [l]abels [f]ollow [x]r [?]Help
(defun reftex-re-enlarge ()
"Enlarge window to a remembered size."
;; FIXME: reftex-last-window-width might be the width of another window on
;; another frame, so the enlarge-window call might make no sense.
;; We should just use `quit-window' instead nowadays.
(let ((count (if reftex-toc-split-windows-horizontally
(- (or reftex-last-window-width (window-total-width))
(window-total-width))
(- (or reftex-last-window-height (window-height))
(window-height)))))
(when (> count 0)
(enlarge-window count reftex-toc-split-windows-horizontally))))
(with-demoted-errors ;E.g. the window might be the root window!
(enlarge-window count reftex-toc-split-windows-horizontally)))))
(defun reftex-toc-dframe-p (&optional frame error)
;; Check if FRAME is the dedicated TOC frame.