Mercurial > emacs
diff lisp/term/x-win.el @ 50115:ca35e855ba24
*** empty log message ***
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Thu, 13 Mar 2003 06:27:57 +0000 |
| parents | 627c4cc6b42b |
| children | 9de1323b5882 |
line wrap: on
line diff
--- a/lisp/term/x-win.el Thu Mar 13 06:23:59 2003 +0000 +++ b/lisp/term/x-win.el Thu Mar 13 06:27:57 2003 +0000 @@ -2126,6 +2126,9 @@ (cond ((>= (length text) x-cut-buffer-max) (x-set-cut-buffer "" push) (setq x-last-selected-text-cut "")) + ;; Don't store a multibyte string that contains + ;; eight-bit-control/graphic chars because they can't be + ;; restored correctly by x-get-cut-buffer. ((and (multibyte-string-p text) (let ((charsets (find-charset-string text))) (or (memq 'eight-bit-control charsets)