* net/dbus.el (dbus-register-property): Use `dont-register' keyword.

1a27c64e · Michael Albinus · 5b83ba18 · 1a27c64e · 1a27c64e
Commit 1a27c64e authored Jan 10, 2011 by Michael Albinus
Hide whitespace changes
Inline Side-by-side

Showing with 9 additions and 5 deletions

lisp/ChangeLog lisp/ChangeLog +4 -0

lisp/net/dbus.el lisp/net/dbus.el +5 -5

No files found.
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
+2011-01-10  Michael Albinus  <michael.albinus@gmx.de>
+
+	* net/dbus.el (dbus-register-property): Use `dont-register' keyword.
+
 2011-01-10  Jan Moringen  <jan.moringen@uni-bielefeld.de>
  
 	* net/dbus.el (dbus-unregister-service): Translate returned

--- a/lisp/net/dbus.el
+++ b/lisp/net/dbus.el
@@ -922,13 +922,13 @@ clients from discovering the still incomplete interface."
  ;; Add handlers for the three property-related methods.
  (dbus-register-method
   bus service path dbus-interface-properties "Get"
-   'dbus-property-handler t)
+   'dbus-property-handler 'dont-register)
  (dbus-register-method
-   bus service path dbus-interface-properties "GetAll" 
-   'dbus-property-handler t)
+   bus service path dbus-interface-properties "GetAll"
+   'dbus-property-handler 'dont-register)
  (dbus-register-method
-   bus service path dbus-interface-properties "Set" 
-   'dbus-property-handler t)
+   bus service path dbus-interface-properties "Set"
+   'dbus-property-handler 'dont-register)

  ;; Register the name SERVICE with BUS.
  (unless dont-register-service