* dbusbind.c (syms_of_dbusbind): Set $DBUS_FATAL_WARNINGS to "0".

(Bug#7113)

diff --git a/src/ChangeLog b/src/ChangeLog
index 380e8becc1fe4ed19256632815215853aefd22c3..c74dd66edbbc791eb5754f6c93de3d0b2a168f3a 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,6 +1,6 @@
 2010-09-27  Michael Albinus  <michael.albinus@gmx.de>
 
-       * dbusbind.c (syms_of_dbusbind): Unset $DBUS_FATAL_WARNINGS.
+       * dbusbind.c (syms_of_dbusbind): Set $DBUS_FATAL_WARNINGS to "0".
        (Bug#7113)
 
 2010-09-26  Jan Djärv  <jan.h.d@swipnet.se>

diff --git a/src/dbusbind.c b/src/dbusbind.c
index 6fc5a9234221878c5661aa8a15734ff2a9f8b9cc..0b5d32ce467aee65cc6b94bf326b1c8d999a9119 100644 (file)
--- a/src/dbusbind.c
+++ b/src/dbusbind.c
@@ -2130,10 +2130,12 @@ message arrives.  */);
     doc: /* If non-nil, debug messages of D-Bus bindings are raised.  */);
 #ifdef DBUS_DEBUG
   Vdbus_debug = Qt;
+  /* We can also set environment DBUS_VERBOSE=1 in order to see more
+     traces.  */
 #else
   Vdbus_debug = Qnil;
   /* We do not want to abort.  */
-  unsetenv ("DBUS_FATAL_WARNINGS");
+  setenv ("DBUS_FATAL_WARNINGS", 0, 1);
 #endif
 
   Fprovide (intern_c_string ("dbusbind"), Qnil);