aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/term
diff options
context:
space:
mode:
authorChong Yidong2012-06-16 17:56:15 +0800
committerChong Yidong2012-06-16 17:56:15 +0800
commit771e3eae1e110cbf1ba50ae25bfcf560fdb0822c (patch)
tree2f0e3fdacfb4338b52e155860d05e6055b0356ea /lisp/term
parent6665a6fd1968288bc83ff8857665168b29828a8b (diff)
downloademacs-771e3eae1e110cbf1ba50ae25bfcf560fdb0822c.tar.gz
emacs-771e3eae1e110cbf1ba50ae25bfcf560fdb0822c.zip
Fix for xterm reportBackground query.
* lisp/term/xterm.el (terminal-init-xterm): Discard input before querying background mode. Fixes: debbugs:10959
Diffstat (limited to 'lisp/term')
-rw-r--r--lisp/term/xterm.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/term/xterm.el b/lisp/term/xterm.el
index 51e5aa5796d..28fb9da0b9d 100644
--- a/lisp/term/xterm.el
+++ b/lisp/term/xterm.el
@@ -539,6 +539,7 @@ The relevant features are:
539 (and (memq 'reportBackground tocheck-capabilities) 539 (and (memq 'reportBackground tocheck-capabilities)
540 version 540 version
541 (>= version 242))) 541 (>= version 242)))
542 (discard-input)
542 (send-string-to-terminal "\e]11;?\e\\") 543 (send-string-to-terminal "\e]11;?\e\\")
543 (when (and (equal (read-event nil nil 2) ?\e) 544 (when (and (equal (read-event nil nil 2) ?\e)
544 (equal (read-event nil nil 2) ?\])) 545 (equal (read-event nil nil 2) ?\]))