diff options
author | Eli Zaretskii <eliz@gnu.org> | 2020-11-30 20:44:11 +0200 |
---|---|---|
committer | Eli Zaretskii <eliz@gnu.org> | 2020-11-30 20:44:11 +0200 |
commit | 3e6525d69f0de68fe2305f8e2102c8a5ce42f671 (patch) | |
tree | aad5ff643ffe09f9bb915321a42ff197ad7f83f1 | |
parent | 9fbff9c35cb4a6c5099178d6c712690ea4614d6a (diff) | |
download | emacs-3e6525d69f0de68fe2305f8e2102c8a5ce42f671.tar.gz |
Don't show in 'view-lossage' responses to xterm feature queries
* lisp/term/xterm.el (xterm--read-event-for-query): Prevent
recording the characters read as the xterm response to a query,
so as not to show them in 'view-lossage'. (Bug#44908)
-rw-r--r-- | lisp/term/xterm.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/term/xterm.el b/lisp/term/xterm.el index 1a727e3933e..709410064b1 100644 --- a/lisp/term/xterm.el +++ b/lisp/term/xterm.el @@ -767,7 +767,8 @@ Can be nil to mean \"no timeout\".") By not redisplaying right away for xterm queries, we can avoid unsightly flashing during initialization. Give up and redisplay anyway if we've been waiting a little while." - (let ((start-time (current-time))) + (let ((start-time (current-time)) + (inhibit--record-char t)) (or (let ((inhibit-redisplay t)) (read-event nil nil xterm-query-redisplay-timeout)) (read-event nil nil |