diff options
| author | Eli Zaretskii | 2020-11-30 20:44:11 +0200 |
|---|---|---|
| committer | Eli Zaretskii | 2020-11-30 20:44:11 +0200 |
| commit | 3e6525d69f0de68fe2305f8e2102c8a5ce42f671 (patch) | |
| tree | aad5ff643ffe09f9bb915321a42ff197ad7f83f1 | |
| parent | 9fbff9c35cb4a6c5099178d6c712690ea4614d6a (diff) | |
| download | emacs-3e6525d69f0de68fe2305f8e2102c8a5ce42f671.tar.gz emacs-3e6525d69f0de68fe2305f8e2102c8a5ce42f671.zip | |
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\".") | |||
| 767 | By not redisplaying right away for xterm queries, we can avoid | 767 | By not redisplaying right away for xterm queries, we can avoid |
| 768 | unsightly flashing during initialization. Give up and redisplay | 768 | unsightly flashing during initialization. Give up and redisplay |
| 769 | anyway if we've been waiting a little while." | 769 | anyway if we've been waiting a little while." |
| 770 | (let ((start-time (current-time))) | 770 | (let ((start-time (current-time)) |
| 771 | (inhibit--record-char t)) | ||
| 771 | (or (let ((inhibit-redisplay t)) | 772 | (or (let ((inhibit-redisplay t)) |
| 772 | (read-event nil nil xterm-query-redisplay-timeout)) | 773 | (read-event nil nil xterm-query-redisplay-timeout)) |
| 773 | (read-event nil nil | 774 | (read-event nil nil |