[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/select.el,v
From: |
Jan Djärv |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/select.el,v |
Date: |
Sat, 16 Sep 2006 17:12:38 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Changes by: Jan Djärv <jhd> 06/09/16 17:12:38
Index: select.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/select.el,v
retrieving revision 1.29
retrieving revision 1.30
diff -u -b -r1.29 -r1.30
--- select.el 6 Feb 2006 14:33:35 -0000 1.29
+++ select.el 16 Sep 2006 17:12:38 -0000 1.30
@@ -223,8 +223,11 @@
(setq str (encode-coding-string str coding))))
((eq type 'UTF8_STRING)
- (setq str (encode-coding-string str 'utf-8)))
-
+ (let ((charsets (find-charset-string str)))
+ (if (or (memq 'eight-bit-control charsets)
+ (memq 'eight-bit-graphic charsets))
+ (setq type 'STRING)
+ (setq str (encode-coding-string str 'utf-8)))))
(t
(error "Unknow selection type: %S" type))
)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/select.el,v,
Jan Djärv <=