[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Patch for focus-frame use in RefTeX (was: declare-function in files from
From: |
Ralf Angeli |
Subject: |
Patch for focus-frame use in RefTeX (was: declare-function in files from Gnus (hashcash.el, imap.el)) |
Date: |
Sat, 05 Jan 2008 14:13:50 +0100 |
* Dan Nicolaescu (2007-12-01) writes:
> Talking about RefTeX, can you please fix this warning:
>
> In reftex-make-separate-toc-frame:
> reftex-toc.el:998:35:Warning: `focus-frame' is an obsolete function (as
> of Emacs 22.1); it does nothing.
Okay, I saw that Glenn went ahead and fixed this in the Emacs trunk.
I've just committed a slightly different change in the RefTeX
repository. Please apply the following patch to reftex-toc.el in the
Emacs repository in order to synchronize both files with respect to this
part of the code.
2008-01-05 Ralf Angeli <address@hidden>
* textmodes/reftex-toc.el (reftex-make-separate-toc-frame):
Simplify selection of frame focusing function.
--- reftex-toc.el.~1.40.~ 2007-12-08 02:02:19.000000000 +0100
+++ reftex-toc.el 2008-01-05 14:04:15.000000000 +0100
@@ -995,10 +995,11 @@
(select-frame current-toc-frame)
(switch-to-buffer "*toc*")
(select-frame current-frame)
- (if (fboundp 'x-focus-frame) (x-focus-frame current-frame)
- ;; focus-frame has done nothing in Emacs since at least v21.
- (if (featurep 'xemacs)
- (if (fboundp 'focus-frame) (focus-frame current-frame))))
+ (cond ((fboundp 'x-focus-frame)
+ (x-focus-frame current-frame))
+ ((and (featurep 'xemacs) ; `focus-frame' is a nop in Emacs.
+ (fboundp 'focus-frame))
+ (focus-frame current-frame)))
(select-window current-window)
(when (eq reftex-auto-recenter-toc 'frame)
(unless reftex-toc-auto-recenter-timer
--
Ralf
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- Patch for focus-frame use in RefTeX (was: declare-function in files from Gnus (hashcash.el, imap.el)),
Ralf Angeli <=