diff options
| author | Michael Albinus <michael.albinus@gmx.de> | 2013-05-28 08:49:19 +0200 |
|---|---|---|
| committer | Michael Albinus <michael.albinus@gmx.de> | 2013-05-28 08:49:19 +0200 |
| commit | ec518f1a35960b9e850373938a251e0a7056ef49 (patch) | |
| tree | dcde309259f492f23ead20231a8d64e7a5c85107 | |
| parent | 962e44a5425bf7bda8c853c0e6acf5c0e7440af9 (diff) | |
| download | emacs-ec518f1a35960b9e850373938a251e0a7056ef49.tar.gz | |
Add comment for last change.
| -rw-r--r-- | lisp/net/dbus.el | 2 |
1 files changed, 2 insertions, 0 deletions
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) |