Re: customize-rouge output with emacs -q --no-site-file

[Luc Teirlinck <teirllm@dms.auburn.edu>]

I believe that the patch below is the correct way to do what you are
trying to do.  It could at the very best be _part_ of a solution.  It
does not solve the other problems I referred to, only the "Erase
Customization" one.  As before, only provided _for experimentation
purposes_.  _Not_ meant to be installed in CVS.  When trying out code
experimenting with Custom, always make sure your .emacs, or whatever
your custom-file is, is properly backed up.

With this new code, I get 3 options after `emacs -q' and
`M-x customize-rogue":

debug-ignored-errors, default-frame-alist and user-mail-address.

I believe that I understand the last two as local peculiarities.
`debug-ignored-errors' is very special.

===File ~/startup-diff======================================
*** startup.el	28 Dec 2004 09:50:38 -0600	1.337
--- startup.el	04 Feb 2005 20:59:49 -0600	
***************
*** 785,790 ****
--- 785,797 ----
                   (cdr tool-bar-lines)
                   (not (eq 0 (cdr tool-bar-lines)))))))
  
+   (mapatoms
+    (lambda (symbol)
+      (and (default-boundp symbol)
+ 	  (get symbol 'standard-value)
+ 	  (put symbol 'standard-value
+ 	       (list (custom-quote (default-value symbol)))))))
+ 
    (let ((old-scalable-fonts-allowed scalable-fonts-allowed)
  	(old-font-list-limit font-list-limit)
  	(old-face-ignored-fonts face-ignored-fonts))
============================================================