# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1047536877 0
# Node ID ca35e855ba24e5311a14e9a2eb508ec709c823a4
# Parent  627c4cc6b42b7c0d860436733c0838db5a01ce16
*** empty log message ***

diff -r 627c4cc6b42b -r ca35e855ba24 lisp/term/x-win.el
--- 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)