GNU bug report logs - #11447
24.1.50; notifications-notify eats keystrokes

Previous Next

Package: emacs;

Reported by: Peter Münster <pmlists <at> free.fr>

Date: Thu, 10 May 2012 20:46:01 UTC

Severity: normal

Found in version 24.1.50

Done: Michael Albinus <michael.albinus <at> gmx.de>

Bug is archived. No further changes may be made.

Full log


View this message in rfc822 format

From: Michael Albinus <michael.albinus <at> gmx.de>
To: Peter Münster <pmlists <at> free.fr>
Cc: 11447 <at> debbugs.gnu.org
Subject: bug#11447: 24.1.50; notifications-notify eats keystrokes
Date: Fri, 11 May 2012 10:07:10 +0200
Peter Münster <pmlists <at> free.fr> writes:

> Hello,

Hi Peter,

> Then just type some text and you'll see, that some of the letters, that
> you type, will be missing in the buffer.

Could you, please, check the following patch:

--8<---------------cut here---------------start------------->8---
*** /home/albinus/src/emacs/lisp/net/dbus.el.~108190~
--- /home/albinus/src/emacs/lisp/net/dbus.el
***************
*** 263,274 ****
  	 (apply
  	  'dbus-message-internal dbus-message-type-method-call
  	  bus service path interface method 'dbus-call-method-handler args)))
      ;; Wait until `dbus-call-method-handler' has put the result into
      ;; `dbus-return-values-table'.  If no timeout is given, use the
!     ;; default 25".
      (with-timeout ((if timeout (/ timeout 1000.0) 25))
        (while (eq (gethash key dbus-return-values-table :ignore) :ignore)
! 	(read-event nil nil 0.1)))
  
      ;; Cleanup `dbus-return-values-table'.  Return the result.
      (prog1
--- 263,278 ----
  	 (apply
  	  'dbus-message-internal dbus-message-type-method-call
  	  bus service path interface method 'dbus-call-method-handler args)))
+ 
      ;; 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.
      (with-timeout ((if timeout (/ timeout 1000.0) 25))
        (while (eq (gethash key dbus-return-values-table :ignore) :ignore)
! 	(let ((event (let (unread-command-events) (read-event nil nil 0.1))))
! 	  (when (and event (not (ignore-errors (dbus-check-event event))))
! 	    (setq unread-command-events
! 		  (append unread-command-events (list event)))))))
  
      ;; Cleanup `dbus-return-values-table'.  Return the result.
      (prog1
--8<---------------cut here---------------end--------------->8---

> Cheers, Peter

Best regards, Michael.




This bug report was last modified 13 years and 9 days ago.

Previous Next


GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.