branch: elpa
commit 5745c81b322984932bffa4265f757769af9fad97
Author: Mosè Giordano <[email protected]>
Commit: Mosè Giordano <[email protected]>
Fix compatibility with GNU Emacs < 24
* tex.el (TeX-source-correlate-sync-source): Call `x-focus-frame' only
when it is available.
---
tex.el | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/tex.el b/tex.el
index 58c8a04..923ce32 100644
--- a/tex.el
+++ b/tex.el
@@ -1886,7 +1886,10 @@ or newer."
(> pos (point-max)))
(widen))
(goto-char pos))
- (x-focus-frame (selected-frame)))))
+ ;; Grab focus after inverse search (only if `x-focus-frame' function is
+ ;; available).
+ (when (fboundp 'x-focus-frame)
+ (x-focus-frame (selected-frame))))))
(define-minor-mode TeX-source-correlate-mode
"Minor mode for forward and inverse search.