summaryrefslogtreecommitdiff
path: root/lisp/term
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2021-08-09 15:43:01 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2021-08-09 15:43:01 +0200
commit89d02841ab8af0a56b6c7e89790109bf8f67c10e (patch)
tree9a5455b420c8b5f00fa82b8e5e53b31948337372 /lisp/term
parent872ca0ff8e0a6f61dc9399fa65788d87c83c8ef6 (diff)
downloademacs-89d02841ab8af0a56b6c7e89790109bf8f67c10e.tar.gz
Make xterm-set-window-title more robust
* lisp/term/xterm.el (xterm-set-window-title): Don't do anything on graphic displays (bug#49932).
Diffstat (limited to 'lisp/term')
-rw-r--r--lisp/term/xterm.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/term/xterm.el b/lisp/term/xterm.el
index 868b33ea9c5..e63bf36cc3d 100644
--- a/lisp/term/xterm.el
+++ b/lisp/term/xterm.el
@@ -944,9 +944,10 @@ See `xterm--init-frame-title'"
(defun xterm-set-window-title (&optional terminal)
"Set the window title of the Xterm TERMINAL.
The title is constructed from `frame-title-format'."
- (send-string-to-terminal
- (format "\e]2;%s\a" (format-mode-line frame-title-format))
- terminal))
+ (unless (display-graphic-p terminal)
+ (send-string-to-terminal
+ (format "\e]2;%s\a" (format-mode-line frame-title-format))
+ terminal)))
(defun xterm--selection-char (type)
(pcase type