comparison lisp/net/dbus.el @ 104357:0626d17129e9

*** empty log message ***
author Michael Albinus <michael.albinus@gmx.de>
date Wed, 19 Aug 2009 07:14:46 +0000
parents 7d92d0b5edc6
children 4bc9f7b48912
comparison
equal deleted inserted replaced
104356:9501bdf3d7dc 104357:0626d17129e9
834 834
835 ;; Initialize :system and :session buses. This adds their file 835 ;; Initialize :system and :session buses. This adds their file
836 ;; descriptors to input_wait_mask, in order to detect incoming 836 ;; descriptors to input_wait_mask, in order to detect incoming
837 ;; messages immediately. 837 ;; messages immediately.
838 (dbus-ignore-errors 838 (dbus-ignore-errors
839 (dbus-init-bus :system)
840 (when (getenv "DBUS_SESSION_BUS_ADDRESS") 839 (when (getenv "DBUS_SESSION_BUS_ADDRESS")
840 (dbus-init-bus :system)
841 (dbus-init-bus :session))) 841 (dbus-init-bus :session)))
842 842
843 (provide 'dbus) 843 (provide 'dbus)
844 844
845 ;; arch-tag: a47caf84-9162-4811-90cc-5d388e37b9bd 845 ;; arch-tag: a47caf84-9162-4811-90cc-5d388e37b9bd