* dbusbind.c (xd_close_bus): Apply proper check on busobj.

diff --git a/src/ChangeLog b/src/ChangeLog
index 8592eef..1db4d4a 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2014-02-18  Michael Albinus  <michael.albinus@gmx.de>
+
+       * dbusbind.c (xd_close_bus): Apply proper check on busobj.
+
 2014-02-17  Paul Eggert  <eggert@cs.ucla.edu>
 
        temacs --daemon fix (Bug#16599).

diff --git a/src/dbusbind.c b/src/dbusbind.c
index f6df510..1c386f0 100644 (file)
--- a/src/dbusbind.c
+++ b/src/dbusbind.c
@@ -973,7 +973,7 @@ xd_get_connection_references (DBusConnection *connection)
   return *refcount;
 }
 
-/* Convert a Lisp dbus object to a pointer */
+/* Convert a Lisp D-Bus object to a pointer.  */
 static DBusConnection*
 xd_lisp_dbus_to_dbus (Lisp_Object bus)
 {
@@ -1095,7 +1095,7 @@ xd_close_bus (Lisp_Object bus)
     return;
 
   busobj = CDR_SAFE(val);
-  if (NILP (val)) {
+  if (NILP (busobj)) {
     xd_registered_buses = Fdelete (val, xd_registered_buses);
     return;
   }