* net/dbus.el (dbus-handle-event): The result of a message call

can also be an object, which is not a consp.

1 files changed, 2 insertions, 1 deletions

diff --git a/lisp/net/dbus.el b/lisp/net/dbus.el
index 5c7e719e305..13c2d39f6dd 100644
--- a/lisp/net/dbus.el
+++ b/lisp/net/dbus.el
@@ -362,7 +362,8 @@ If the HANDLER returns an `dbus-error', it is propagated as return message."
         (when (= dbus-message-type-method-call (nth 2 event))
           (dbus-ignore-errors
             (apply 'dbus-method-return-internal
-             (nth 1 event) (nth 3 event) (nth 4 event) result))))
+             (nth 1 event) (nth 3 event) (nth 4 event)
+             (if (consp result) result (list result))))))
     ;; Error handling.
     (dbus-error
      ;; Return an error message when it is a message call.