diff options
author | Po Lu <luangruo@yahoo.com> | 2022-02-01 10:13:15 +0800 |
---|---|---|
committer | Po Lu <luangruo@yahoo.com> | 2022-02-01 10:13:15 +0800 |
commit | 99c637499ec2bc0babb5d98b16f9c578952d54fd (patch) | |
tree | a5ea9bd5e0eef5a86139434dc04ff2dea646f98e /lisp/select.el | |
parent | 16174d796f86fe31c4a20ece471bed10f23c229f (diff) | |
download | emacs-99c637499ec2bc0babb5d98b16f9c578952d54fd.tar.gz emacs-99c637499ec2bc0babb5d98b16f9c578952d54fd.tar.bz2 emacs-99c637499ec2bc0babb5d98b16f9c578952d54fd.zip |
Only apply last change to the clipboard
* lisp/select.el (gui--selection-value-internal): Only return
nil if we own the clipboard.
Diffstat (limited to 'lisp/select.el')
-rw-r--r-- | lisp/select.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/select.el b/lisp/select.el index 420967c1b00..d9f537cfce6 100644 --- a/lisp/select.el +++ b/lisp/select.el @@ -173,6 +173,7 @@ decoded. If `gui-get-selection' signals an error, return nil." (unless (and (memq window-system '(x haiku)) ;; gui-backend-selection-p might be unreliable on other ;; window systems. + (eq type 'CLIPBOARD) (gui-backend-selection-owner-p type)) (let ((request-type (if (memq window-system '(x pgtk)) (or x-select-request-type |