diff options
| -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 d6a18fee706..c095ea50c44 100644 --- a/lisp/select.el +++ b/lisp/select.el | |||
| @@ -176,8 +176,8 @@ Cut buffers are considered obsolete; you should use selections instead." | |||
| 176 | (if coding | 176 | (if coding |
| 177 | (setq coding (coding-system-base coding)) | 177 | (setq coding (coding-system-base coding)) |
| 178 | (setq coding 'raw-text)) | 178 | (setq coding 'raw-text)) |
| 179 | ;; Suppress producing escape sequences for compositions. | ||
| 180 | (let ((inhibit-read-only t)) | 179 | (let ((inhibit-read-only t)) |
| 180 | ;; Suppress producing escape sequences for compositions. | ||
| 181 | (remove-text-properties 0 (length str) '(composition nil) str) | 181 | (remove-text-properties 0 (length str) '(composition nil) str) |
| 182 | (cond | 182 | (cond |
| 183 | ((eq type 'TEXT) | 183 | ((eq type 'TEXT) |