[elpa] 137/299: Better check for DBUS support.

[Stefan Monnier]

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

commit 536cea74cd65b66c7f8721a2e298c02d9fc4ecef
Author: Tassilo Horn <address@hidden>
Date:   Fri Jun 21 11:01:19 2013 +0200

    Better check for DBUS support.
    
    * tex.el (TeX-evince-dbus-p): Improved DBUS availability check.
---
 ChangeLog |    4 ++++
 tex.el    |    6 ++----
 2 files changed, 6 insertions(+), 4 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 23b0906..d7ece1f 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2013-06-21  Tassilo Horn  <address@hidden>
+
+       * tex.el (TeX-evince-dbus-p): Improved DBUS availability check.
+
 2013-06-21  R�diger Sonderfeld  <address@hidden>
 
        * tex.el (TeX-doc-backend-alist): Remove unnecessary `info' check.
diff --git a/tex.el b/tex.el
index 2df7a4d..1e82bc1 100644
--- a/tex.el
+++ b/tex.el
@@ -1027,11 +1027,9 @@ given, only the minimal requirements needed by backward 
search
 are checked.  If OPTIONS include `:forward', which is currently
 the only option, then additional requirements needed by forward
 search are checked, too."
-  (and (not (featurep 'xemacs)) ; XEmacs 21.4 has no `require' with
-                               ; arity 3, and no dbus support anyway.
+  (and (featurep 'dbusbind)
        (require 'dbus nil :no-error)
-       (functionp 'dbus-register-signal)
-       (getenv "DBUS_SESSION_BUS_ADDRESS")
+       (dbus-ignore-errors (dbus-get-unique-name :session))
        (executable-find "evince")
        (or (not (memq :forward options))
           (let ((spec (dbus-introspect-get-method