procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

lisp/term/xterm.el (xterm--query-name-and-version): Don't quote lambda

Browse source
This commit is contained in:
Stefan Monnier 2025-02-14 23:05:29 -05:00
parent b58552ca98
commit 8d968c0f22
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
lisp/term/xterm.el
View file

@ -912,10 +912,10 @@ We run the first FUNCTION whose STRING matches the input events."
(catch 'result
(xterm--query
"\e[>0q"
'(("\eP>|" . (lambda ()
;; The reply should be: \e P > | STRING \e \\
(let ((str (xterm--read-string ?\e ?\\)))
(throw 'result str))))))
`(("\eP>|" . ,(lambda ()
;; The reply should be: \e P > | STRING \e \\
(let ((str (xterm--read-string ?\e ?\\)))
(throw 'result str))))))
nil)))
(defun xterm--push-map (map basemap)