comparison lisp/cus-start.el @ 91673:9bf7ff5c46e6

(selection-coding-system): Remove, since it's now defined in select.el rather than in xselect.c.
author Glenn Morris <rgm@gnu.org>
date Fri, 08 Feb 2008 20:12:26 +0000
parents c70e45a7acfd
children ba44d1d76296
comparison
equal deleted inserted replaced
91672:e78323082141 91673:9bf7ff5c46e6
127 :tag "Single coding system" 127 :tag "Single coding system"
128 :value undecided 128 :value undecided
129 :match (lambda (widget value) 129 :match (lambda (widget value)
130 (and value (not (functionp value))))) 130 (and value (not (functionp value)))))
131 (function :value ignore)))) 131 (function :value ignore))))
132 (selection-coding-system mule coding-system "22.1")
133 ;; dired.c 132 ;; dired.c
134 (completion-ignored-extensions dired 133 (completion-ignored-extensions dired
135 (repeat (string :format "%v"))) 134 (repeat (string :format "%v")))
136 ;; dispnew.c 135 ;; dispnew.c
137 (baud-rate display integer) 136 (baud-rate display integer)
463 (put symbol 'custom-version version))))) 462 (put symbol 'custom-version version)))))
464 463
465 (custom-add-to-group 'iswitchb 'read-buffer-function 'custom-variable) 464 (custom-add-to-group 'iswitchb 'read-buffer-function 'custom-variable)
466 (custom-add-to-group 'font-lock 'open-paren-in-column-0-is-defun-start 465 (custom-add-to-group 'font-lock 'open-paren-in-column-0-is-defun-start
467 'custom-variable) 466 'custom-variable)
468 (put 'selection-coding-system 'custom-set
469 (lambda (symbol value)
470 (set-selection-coding-system value)
471 (set symbol value)))
472 467
473 ;; Record cus-start as loaded 468 ;; Record cus-start as loaded
474 ;; if we have set up all the info that we can set up. 469 ;; if we have set up all the info that we can set up.
475 ;; Don't record cus-start as loaded 470 ;; Don't record cus-start as loaded
476 ;; if we have set up only the standard values. 471 ;; if we have set up only the standard values.