diff options
| author | Yuuki Harano | 2021-02-16 23:41:33 +0900 |
|---|---|---|
| committer | Yuuki Harano | 2021-02-16 23:41:33 +0900 |
| commit | f094806ffb78487f9d11773134dfbebea2bd95dd (patch) | |
| tree | 0b487a56c7ba6c6ad6687681ec915a36ead96127 | |
| parent | c4cc80e1fbbfb50486c6ce360f2d68e96fc45887 (diff) | |
| download | emacs-f094806ffb78487f9d11773134dfbebea2bd95dd.tar.gz emacs-f094806ffb78487f9d11773134dfbebea2bd95dd.zip | |
Fix I can't paste international text from clipboard
* lisp/select.el (gui--selection-value-internal):
Try UTF8_STRING when pgtk as well as x.
| -rw-r--r-- | lisp/select.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/select.el b/lisp/select.el index c39bc93deab..897b66a028c 100644 --- a/lisp/select.el +++ b/lisp/select.el | |||
| @@ -165,7 +165,7 @@ The value nil is the same as the list (UTF8_STRING COMPOUND_TEXT STRING)." | |||
| 165 | Call `gui-get-selection' with an appropriate DATA-TYPE argument | 165 | Call `gui-get-selection' with an appropriate DATA-TYPE argument |
| 166 | decided by `x-select-request-type'. The return value is already | 166 | decided by `x-select-request-type'. The return value is already |
| 167 | decoded. If `gui-get-selection' signals an error, return nil." | 167 | decoded. If `gui-get-selection' signals an error, return nil." |
| 168 | (let ((request-type (if (eq window-system 'x) | 168 | (let ((request-type (if (memq window-system '(x pgtk)) |
| 169 | (or x-select-request-type | 169 | (or x-select-request-type |
| 170 | '(UTF8_STRING COMPOUND_TEXT STRING)) | 170 | '(UTF8_STRING COMPOUND_TEXT STRING)) |
| 171 | 'STRING)) | 171 | 'STRING)) |