]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix yank-media--get-selection thinko in previous change
authorLars Ingebrigtsen <larsi@gnus.org>
Mon, 8 Nov 2021 05:03:41 +0000 (06:03 +0100)
committerLars Ingebrigtsen <larsi@gnus.org>
Mon, 8 Nov 2021 05:03:41 +0000 (06:03 +0100)
* lisp/yank-media.el (yank-media--get-selection): Fix thinko after
previous change.

lisp/yank-media.el

index bc57e96612ced5fe522bd0d6cb2a5a081c59bd6a..070a81b8c700ea32e0b0a71471b11bd7dde40570 100644 (file)
@@ -80,12 +80,11 @@ all the different selection types."
               (yank-media--get-selection type)))))
    (gui-get-selection 'CLIPBOARD 'TARGETS)))
 
-(defun yank-media--get-selection (type)
-  (let ((selection-coding-system 'binary))
-    (when-let ((data (gui-get-selection 'CLIPBOARD type)))
-      (if (string-match-p "\\`text/" (symbol-name type))
-          (yank-media-types--format type data)
-        data))))
+(defun yank-media--get-selection (data-type)
+  (when-let ((data (gui-get-selection 'CLIPBOARD data-type)))
+    (if (string-match-p "\\`text/" (symbol-name data-type))
+        (yank-media-types--format data-type data)
+      data)))
 
 ;;;###autoload
 (defun yank-media-handler (types handler)