diff options
| author | Michael Albinus | 2014-02-27 16:36:14 +0100 |
|---|---|---|
| committer | Michael Albinus | 2014-02-27 16:36:14 +0100 |
| commit | d8c25f59d6b1df65cd1a03deb6341524d2c481b8 (patch) | |
| tree | aa2d8d343f027d9a7b7574259d38d4bc3449c28f /src | |
| parent | 298520dfb7f609e41db1368ff47834d3d04e2183 (diff) | |
| download | emacs-d8c25f59d6b1df65cd1a03deb6341524d2c481b8.tar.gz emacs-d8c25f59d6b1df65cd1a03deb6341524d2c481b8.zip | |
* dbusbind.c (Fdbus__init_bus, Qdbus__init_bus, Sdbus__init_bus):
Rename from Fdbus_init_bus_1, Qdbus_init_bus_1, Sdbus_init_bus_1.
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 5 | ||||
| -rw-r--r-- | src/dbusbind.c | 14 |
2 files changed, 12 insertions, 7 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index 0c0d5964742..88458de6b01 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2014-02-27 Michael Albinus <michael.albinus@gmx.de> | ||
| 2 | |||
| 3 | * dbusbind.c (Fdbus__init_bus, Qdbus__init_bus, Sdbus__init_bus): | ||
| 4 | Rename from Fdbus_init_bus_1, Qdbus_init_bus_1, Sdbus_init_bus_1. | ||
| 5 | |||
| 1 | 2014-02-26 Martin Rudalics <rudalics@gmx.at> | 6 | 2014-02-26 Martin Rudalics <rudalics@gmx.at> |
| 2 | 7 | ||
| 3 | Fixes around Bug#16647. | 8 | Fixes around Bug#16647. |
diff --git a/src/dbusbind.c b/src/dbusbind.c index 460733c7239..8ebc56c72c4 100644 --- a/src/dbusbind.c +++ b/src/dbusbind.c | |||
| @@ -42,7 +42,7 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */ | |||
| 42 | 42 | ||
| 43 | 43 | ||
| 44 | /* Subroutines. */ | 44 | /* Subroutines. */ |
| 45 | static Lisp_Object Qdbus_init_bus_1; | 45 | static Lisp_Object Qdbus__init_bus; |
| 46 | static Lisp_Object Qdbus_get_unique_name; | 46 | static Lisp_Object Qdbus_get_unique_name; |
| 47 | static Lisp_Object Qdbus_message_internal; | 47 | static Lisp_Object Qdbus_message_internal; |
| 48 | 48 | ||
| @@ -1094,7 +1094,7 @@ xd_close_bus (Lisp_Object bus) | |||
| 1094 | if (NILP (val)) | 1094 | if (NILP (val)) |
| 1095 | return; | 1095 | return; |
| 1096 | 1096 | ||
| 1097 | busobj = CDR_SAFE(val); | 1097 | busobj = CDR_SAFE (val); |
| 1098 | if (NILP (busobj)) { | 1098 | if (NILP (busobj)) { |
| 1099 | xd_registered_buses = Fdelete (val, xd_registered_buses); | 1099 | xd_registered_buses = Fdelete (val, xd_registered_buses); |
| 1100 | return; | 1100 | return; |
| @@ -1121,11 +1121,11 @@ xd_close_bus (Lisp_Object bus) | |||
| 1121 | return; | 1121 | return; |
| 1122 | } | 1122 | } |
| 1123 | 1123 | ||
| 1124 | DEFUN ("dbus-init-bus-1", Fdbus_init_bus_1, Sdbus_init_bus_1, 1, 2, 0, | 1124 | DEFUN ("dbus--init-bus", Fdbus__init_bus, Sdbus__init_bus, 1, 2, 0, |
| 1125 | doc: /* Establish the connection to D-Bus BUS. | 1125 | doc: /* Establish the connection to D-Bus BUS. |
| 1126 | 1126 | ||
| 1127 | This function is dbus-internal. You almost certainly want to use | 1127 | This function is dbus internal. You almost certainly want to use |
| 1128 | dbus-init-bus. | 1128 | `dbus-init-bus'. |
| 1129 | 1129 | ||
| 1130 | BUS can be either the symbol `:system' or the symbol `:session', or it | 1130 | BUS can be either the symbol `:system' or the symbol `:session', or it |
| 1131 | can be a string denoting the address of the corresponding bus. For | 1131 | can be a string denoting the address of the corresponding bus. For |
| @@ -1745,8 +1745,8 @@ void | |||
| 1745 | syms_of_dbusbind (void) | 1745 | syms_of_dbusbind (void) |
| 1746 | { | 1746 | { |
| 1747 | 1747 | ||
| 1748 | DEFSYM (Qdbus_init_bus_1, "dbus-init-bus-1"); | 1748 | DEFSYM (Qdbus__init_bus, "dbus--init-bus"); |
| 1749 | defsubr (&Sdbus_init_bus_1); | 1749 | defsubr (&Sdbus__init_bus); |
| 1750 | 1750 | ||
| 1751 | DEFSYM (Qdbus_get_unique_name, "dbus-get-unique-name"); | 1751 | DEFSYM (Qdbus_get_unique_name, "dbus-get-unique-name"); |
| 1752 | defsubr (&Sdbus_get_unique_name); | 1752 | defsubr (&Sdbus_get_unique_name); |