[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#36950: 27.0.50; Paste to isearch does not work
From: |
Juri Linkov |
Subject: |
bug#36950: 27.0.50; Paste to isearch does not work |
Date: |
Fri, 13 Dec 2019 01:58:30 +0200 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/27.0.50 (x86_64-pc-linux-gnu) |
> This is continuation of the closed bug#18727.
This needs to be fixed before the release. I provided the following patch
that fixes the problem, and don't know what else is needed.
diff --git a/lisp/isearch.el b/lisp/isearch.el
index 7c22e6ad97..1705b050b5 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -2508,10 +2508,12 @@ isearch-mouse-2
(declare-function xterm--pasted-text "term/xterm" ())
-(defun isearch-xterm-paste ()
+(defun isearch-xterm-paste (event)
"Pull terminal paste into search string."
- (interactive)
- (isearch-yank-string (xterm--pasted-text)))
+ (interactive "e")
+ (when (eq (car-safe event) 'xterm-paste)
+ (let ((pasted-text (nth 1 event)))
+ (isearch-yank-string pasted-text))))
(defun isearch-yank-internal (jumpform)
"Pull the text from point to the point reached by JUMPFORM.
- bug#36950: 27.0.50; Paste to isearch does not work,
Juri Linkov <=