[elpa] 101/299: Improve Evince backward search.

[Stefan Monnier]

monnier pushed a commit to branch externals/auctex
in repository elpa.

commit 6c3ab87b7463aeab7e899f0a2956a2f4e7c45395
Author: Tassilo Horn <address@hidden>
Date:   Tue Apr 16 11:27:58 2013 +0200

    Improve Evince backward search.
    
    * tex.el (TeX-source-correlate-sync-source): Use `raise-frame'
    instead of the external wmctrl command to raise the emacs frame.
---
 ChangeLog |    5 +++++
 tex.el    |    4 +---
 2 files changed, 6 insertions(+), 3 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 8ebeec9..fe9f160 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2013-04-16  Tassilo Horn  <address@hidden>
+
+       * tex.el (TeX-source-correlate-sync-source): Use `raise-frame'
+       instead of the external wmctrl command to raise the emacs frame.
+
 2013-04-15  Mos� Giordano  <address@hidden>
 
        * latex.el (TeX-read-key-val): Add `prompt' optional argument.
diff --git a/tex.el b/tex.el
index 13e83ab..329ad12 100644
--- a/tex.el
+++ b/tex.el
@@ -1523,9 +1523,7 @@ sent by Evince-3.0.0 or newer."
       (forward-line (1- line))
       (unless (= col -1)
         (move-to-column col))
-      (let ((wmctrl (executable-find "wmctrl")))
-       (when wmctrl
-         (start-process "wmctrl" nil wmctrl "-R" (frame-parameter nil 
'name)))))))
+      (raise-frame))))
 
 (define-minor-mode TeX-source-correlate-mode
   "Minor mode for forward and inverse search.