Re: customize

[Stefan Monnier]

>     BTW. How about changing startup.el such that custom-file is loaded
>     (after .emacs) if it has been set and if the file hasn't been loaded yet
>     (such that users only need to put (setq custom-file "~/.custom") in
>     their .emacs file) ?
> 
> I see nothing wrong with that.  Want to do it?

I use the patch below.  If there's no objection, I'll install it.
We can then change the manual's example to just be

        (setq custom-file "~/.emacs-custom")


-- Stefan


--- startup.el  4 Aug 2002 16:18:18 -0000       1.303
+++ startup.el  13 Aug 2002 16:25:37 -0000
@@ -932,6 +935,12 @@
                              (sit-for 1))
                            (setq user-init-file source))))
                      
+                     (when (and (stringp custom-file)
+                                (not (assoc custom-file load-history)))
+                       ;; If the .emacs file has set `custom-file' but hasn't
+                       ;; loaded the file yet, let's load it.
+                       (load custom-file t t))
+                     
                      (or inhibit-default-init
                          (let ((inhibit-startup-message nil))
                            ;; Users are supposed to be told their rights.