CVSROOT: /sources/auctex Module name: auctex Changes by: Tassilo Horn <tsdh> 12/04/11 07:19:20
Index: tex.el =================================================================== RCS file: /sources/auctex/auctex/tex.el,v retrieving revision 5.692 retrieving revision 5.693 diff -u -b -r5.692 -r5.693 --- tex.el 11 Apr 2012 06:38:26 -0000 5.692 +++ tex.el 11 Apr 2012 07:19:20 -0000 5.693 @@ -1015,12 +1015,23 @@ (require 'dbus) (getenv "DBUS_SESSION_BUS_ADDRESS") (executable-find "evince") - (if (memq :forward options) - (dbus-introspect-get-method + (or (not (memq :forward options)) + (let ((spec (dbus-introspect-get-method :session "org.gnome.evince.Daemon" "/org/gnome/evince/Daemon" "org.gnome.evince.Daemon" - "FindDocument")))) + "FindDocument"))) + ;; FindDocument must exist, and its signature must be (String, + ;; Boolean, String). Evince versions between 2.30 and 2.91.x + ;; didn't have the Boolean spawn argument we need to start evince + ;; initially. + (and spec + (equal '("s" "b" "s") + (delq nil (mapcar (lambda (elem) + (when (and (listp elem) + (eq (car elem) 'arg)) + (cdr (caar (cdr elem))))) + spec)))))))) (defun TeX-evince-sync-view () "Focus the focused page/paragraph in Evince with the position _______________________________________________ auctex-diffs mailing list auctex-di...@gnu.org https://lists.gnu.org/mailman/listinfo/auctex-diffs