# HG changeset patch
# User Oleksandr Gavenko <gavenkoa@gmail.com>
# Date 1229704097 -7200
# Node ID 0591d06cf752a43f79cd79ca6f8852ff42ad2c62
# Parent  25585e240b4a287c79493a71cc46153d25d90639
Решил проблему copy/paste в X. Решил проблему поиска в UTF-8 буфере.
Исправления работают только с 22.x версии.

diff -r 25585e240b4a -r 0591d06cf752 .emacs-my
--- a/.emacs-my	Tue Dec 09 17:07:30 2008 +0200
+++ b/.emacs-my	Fri Dec 19 18:28:17 2008 +0200
@@ -223,22 +223,28 @@
 (prefer-coding-system 'cp866-dos)
 
 (modify-coding-system-alist 'file "\\.el" 'iso-2022-7bit)
-(if (equal window-system 'w32)          ; also (string-equal system-type "windows-nt")
-    (progn
-      (set-selection-coding-system   'cp1251)
-      (prefer-coding-system 'utf-8-unix)
-      (prefer-coding-system 'cp1251-dos)
-      (modify-coding-system-alist 'file "\\.[ch]$" 'cp1251)
-      (modify-coding-system-alist 'file "[Mm]akefile.*$" 'cp1251)
-      )
+(cond 
+ ((equal window-system 'w32)          ; also (string-equal system-type "windows-nt")
   (progn
-    (set-selection-coding-system   'utf-8-unix)
+    (set-selection-coding-system   'cp1251)
+    (prefer-coding-system 'utf-8-unix)
+    (prefer-coding-system 'cp1251-dos)
+    ))
+ ((equal window-system 'x)
+  (progn
     (prefer-coding-system 'cp1251-dos)
     (prefer-coding-system 'utf-8-unix)
-    (modify-coding-system-alist 'file "\\.[ch]$" 'cp1251-unix)
-    (modify-coding-system-alist 'file "[Mm]akefile.*$" 'cp1251-unix)
+    (setq selection-coding-system 'ctext-with-extensions)
+    (setq x-select-request-type '(UTF8_STRING COMPOUND_TEXT TEXT STRING))
     (modify-coding-system-alist 'process ".*" 'utf-8-unix)
-    )
+    ))
+ (t
+  (progn
+    ;; (set-selection-coding-system   'utf-8-unix)
+    (prefer-coding-system 'cp1251-dos)
+    (prefer-coding-system 'utf-8-unix)
+    (modify-coding-system-alist 'process ".*" 'utf-8-unix)
+    ))
   )
 
 ;; XXXXXXXXXXXXXXXXXXXXXXXX