From ec518f1a35960b9e850373938a251e0a7056ef49 Mon Sep 17 00:00:00 2001
From: Michael Albinus <michael.albinus@gmx.de>
Date: Tue, 28 May 2013 08:49:19 +0200
Subject: [PATCH] Add comment for last change.

---
 lisp/net/dbus.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/lisp/net/dbus.el b/lisp/net/dbus.el
index 94a906122fe..0e9c4fc5c76 100644
--- a/lisp/net/dbus.el
+++ b/lisp/net/dbus.el
@@ -268,6 +268,8 @@ object is returned instead of a list containing this single Lisp object.
     ;; Wait until `dbus-call-method-handler' has put the result into
     ;; `dbus-return-values-table'.  If no timeout is given, use the
     ;; default 25".  Events which are not from D-Bus must be restored.
+    ;; `read-event' performs a redisplay.  This must be suppressed; it
+    ;; hurts when reading D-Bus events asynchronously.
     (with-timeout ((if timeout (/ timeout 1000.0) 25))
       (while (eq (gethash key dbus-return-values-table :ignore) :ignore)
 	(let ((event (let ((inhibit-redisplay t) unread-command-events)
-- 
2.39.2