mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-25 19:11:56 +00:00
Code Issues Releases Activity

* dbusbind.c (XD_DEBUG_MESSAGE): Don't print message twice in

Browse Source 
batch mode.
This commit is contained in:
Michael Albinus 2012-05-07 16:57:18 +02:00
parent 1241b724c8
commit 9a4b36f891
2 changed files with 13 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
src/ChangeLog
View File

@ -1,3 +1,8 @@
2012-05-07 Michael Albinus <michael.albinus@gmx.de>
* dbusbind.c (XD_DEBUG_MESSAGE): Don't print message twice in
batch mode.
2012-05-06 Chong Yidong <cyd@gnu.org> 2012-05-06 Chong Yidong <cyd@gnu.org>
* lisp.mk (lisp): Update. * lisp.mk (lisp): Update.
@ -245,7 +250,7 @@
(xd_close_bus): Rename from Fdbus_close_bus. Not needed on Lisp (xd_close_bus): Rename from Fdbus_close_bus. Not needed on Lisp
level. level.
(Fdbus_init_bus): New optional arg PRIVATE. Cache address. (Fdbus_init_bus): New optional arg PRIVATE. Cache address.
Return number of recounts. Return number of refcounts.
(Fdbus_get_unique_name): Make stronger parameter check. (Fdbus_get_unique_name): Make stronger parameter check.
(Fdbus_message_internal): New defun. (Fdbus_message_internal): New defun.
(Fdbus_call_method, Fdbus_call_method_asynchronously) (Fdbus_call_method, Fdbus_call_method_asynchronously)

13
src/dbusbind.c
View File

@ -111,12 +111,13 @@ static int xd_in_read_queued_messages = 0;
/* Macros for debugging. In order to enable them, build with /* Macros for debugging. In order to enable them, build with
"env MYCPPFLAGS='-DDBUS_DEBUG -Wall' make". */ "env MYCPPFLAGS='-DDBUS_DEBUG -Wall' make". */
#ifdef DBUS_DEBUG #ifdef DBUS_DEBUG
#define XD_DEBUG_MESSAGE(...) \ #define XD_DEBUG_MESSAGE(...) \
do { \ do { \
char s[1024]; \ char s[1024]; \
snprintf (s, sizeof s, __VA_ARGS__); \ snprintf (s, sizeof s, __VA_ARGS__); \
printf ("%s: %s\n", __func__, s); \ if (!noninteractive) \
message ("%s: %s", __func__, s); \ printf ("%s: %s\n", __func__, s); \
message ("%s: %s", __func__, s); \
} while (0) } while (0)
#define XD_DEBUG_VALID_LISP_OBJECT_P(object) \ #define XD_DEBUG_VALID_LISP_OBJECT_P(object) \
do { \ do { \