master 03d6644970: * lisp/subr.el (insert-for-yank): Add nil to run-hook-wrapped to keep looping.

[Juri Linkov]

branch: master
commit 03d6644970e6b9b505ef35ed96c379cc73f25486
Author: Juri Linkov <juri@linkov.net>
Commit: Juri Linkov <juri@linkov.net>

    * lisp/subr.el (insert-for-yank): Add nil to run-hook-wrapped to keep 
looping.
---
 lisp/subr.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/subr.el b/lisp/subr.el
index 0b415d8b2c..8afba2b341 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -4084,7 +4084,7 @@ This function is like `insert', except it honors the 
variables
 It also runs the string through `yank-transform-functions'."
   ;; Allow altering the yank string.
   (run-hook-wrapped 'yank-transform-functions
-                    (lambda (f) (setq string (funcall f string))))
+                    (lambda (f) (setq string (funcall f string)) nil))
   (let (to)
     (while (setq to (next-single-property-change 0 'yank-handler string))
       (insert-for-yank-1 (substring string 0 to))