(selection-coding-system, scalable-fonts-allowed):

Added.

2 files changed, 20 insertions, 2 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6d99a8a5960..94c7a13da28 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,13 @@
+2002-10-29  Dave Love  <fx@gnu.org>
+
+        * cus-start.el (selection-coding-system, scalable-fonts-allowed):
+        Added.
+
+        * progmodes/scheme.el (syntax-case): Define
+        scheme-indent-function.
+
+        * international/mule-conf.el: Doc fixes.
+
 2002-10-29  Richard M. Stallman  <rms@gnu.org>
 
         * server.el (server-switch-buffer): Say when no server buffers remain.
@@ -16,8 +26,9 @@
 
 2002-10-29  Masayuki Ataka  <ataka@milk.freemail.ne.jp>  (tiny change)
 
-        * textmodes/texinfo.el (texinfo-environments): Add environment; copying,
-        documentdescription, ifplaintext, ifnotplaintext, and verbatim.
+        * textmodes/texinfo.el (texinfo-environments): Add environment;
+        copying, documentdescription, ifplaintext, ifnotplaintext, and
+        verbatim.
 
         * textmodes/texinfmt.el (texinfo-format-ifplaintext): New function.
         (ifplaintext, ifnotplaintext)
diff --git a/lisp/cus-start.el b/lisp/cus-start.el
index 08a99ea4d68..b5161bfcb99 100644
--- a/lisp/cus-start.el
+++ b/lisp/cus-start.el
@@ -82,6 +82,7 @@
                             (coding-system :tag "Single coding system"
                                            :value undecided)
                             (function :value ignore))))
+             (selection-coding-system mule coding-system)
              ;; dired.c
              (completion-ignored-extensions dired 
                                             (repeat (string :format "%v")))
@@ -255,6 +256,8 @@
                                                      :format "%v")
                                             (other :tag "Unlimited" t)))
              (unibyte-display-via-language-environment mule boolean)
+             ;; xfaces.c
+             (scalable-fonts-allowed display boolean)
              ;; xfns.c
              (x-bitmap-file-path installation
                                  (repeat (directory :format "%v")))
@@ -312,6 +315,10 @@
         (put symbol 'custom-version version)))))
 
 (custom-add-to-group 'iswitchb 'read-buffer-function '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.