# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1202501493 0
# Node ID 6ec8ade53232989615e0d76f5ecece483e9fb43d
# Parent  dd3b45bfc388131cb3c9ab52354abd74c64fe5ed
Revert previous change, which should have been on the trunk.

diff -r dd3b45bfc388 -r 6ec8ade53232 lisp/cus-start.el
--- a/lisp/cus-start.el	Fri Feb 08 20:09:16 2008 +0000
+++ b/lisp/cus-start.el	Fri Feb 08 20:11:33 2008 +0000
@@ -129,6 +129,7 @@
 			     :match (lambda (widget value)
 				      (and value (not (functionp value)))))
 			    (function :value ignore))))
+	     (selection-coding-system mule coding-system "22.1")
 	     ;; dired.c
 	     (completion-ignored-extensions dired
 					    (repeat (string :format "%v")))
@@ -455,6 +456,10 @@
 (custom-add-to-group 'iswitchb 'read-buffer-function 'custom-variable)
 (custom-add-to-group 'font-lock 'open-paren-in-column-0-is-defun-start
 		     'custom-variable)
+(put 'selection-coding-system 'custom-set
+     (lambda (symbol value)
+       (set-selection-coding-system value)
+       (set symbol value)))
 
 ;; Record cus-start as loaded
 ;; if we have set up all the info that we can set up.