Subject: bug#64423: 29.0.92; save-interprogram-paste-before-kill doesn't prevent streaming large selections

From: Eli Zaretskii <[email-masked]>
Date: Sat, 08 Jul 2023 19:48:29 +0300

> Cc: Spencer Baugh <[email-masked]>, [email-masked]
> From: [email-masked]
> Date: Sat, 08 Jul 2023 16:39:00 +0000 (UTC)
> 
> diff --git a/lisp/simple.el b/lisp/simple.el
> index 26944f1f72d..95d00cc506b 100644
> --- a/lisp/simple.el
> +++ b/lisp/simple.el
> @@ -5618,8 +5618,10 @@ kill-new
>        (if (fboundp 'menu-bar-update-yank-menu)
>  	  (menu-bar-update-yank-menu string (and replace (car kill-ring)))))
>      (when save-interprogram-paste-before-kill
> -      (let ((interprogram-paste (and interprogram-paste-function
> -                                     (funcall interprogram-paste-function))))
> +      (let ((interprogram-paste
> +             (ignore-error 'quit
> +               (and interprogram-paste-function
> +                    (funcall interprogram-paste-function)))))
>          (when interprogram-paste
>            (setq interprogram-paste
>                  (if (listp interprogram-paste)

Are you sure this is TRT for all the implementations of GUI
selections?  AFAIU, the discussion was only about X.