diff options
| author | Lars Ingebrigtsen | 2021-11-06 22:44:31 +0100 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2021-11-06 22:44:31 +0100 |
| commit | 14a5ad139caa96e253c3073f82ddba0ceb4f3cff (patch) | |
| tree | 6e48e5aea231ef27fe1cd56431bb2029da8ea48f | |
| parent | 973f0aa5595de878f5c01b0b9365dfb57e54f7f4 (diff) | |
| download | emacs-14a5ad139caa96e253c3073f82ddba0ceb4f3cff.tar.gz emacs-14a5ad139caa96e253c3073f82ddba0ceb4f3cff.zip | |
Fix typo in previous yank-media--get-selection change
* lisp/yank-media.el (yank-media--get-selection): Fix typo in
previous change.
| -rw-r--r-- | lisp/yank-media.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/yank-media.el b/lisp/yank-media.el index bc104a30c9f..aba0fdc2bfb 100644 --- a/lisp/yank-media.el +++ b/lisp/yank-media.el | |||
| @@ -77,7 +77,7 @@ the `register-yank-media-handler' mechanism." | |||
| 77 | (defun yank-media--get-selection (type) | 77 | (defun yank-media--get-selection (type) |
| 78 | (when-let ((data (gui-get-selection 'CLIPBOARD type))) | 78 | (when-let ((data (gui-get-selection 'CLIPBOARD type))) |
| 79 | (when-let ((charset (get-text-property 0 'charset data))) | 79 | (when-let ((charset (get-text-property 0 'charset data))) |
| 80 | (setq date (encode-coding-string data charset))) | 80 | (setq data (encode-coding-string data charset))) |
| 81 | ;; Some programs add a nul character at the end of text/* | 81 | ;; Some programs add a nul character at the end of text/* |
| 82 | ;; selections. Remove that. | 82 | ;; selections. Remove that. |
| 83 | (when (and (string-match-p "\\`text/" (symbol-name type)) | 83 | (when (and (string-match-p "\\`text/" (symbol-name type)) |