From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: Luc Teirlinck Newsgroups: gmane.emacs.devel Subject: Re: customize-rouge output with emacs -q --no-site-file Date: Fri, 4 Feb 2005 21:51:21 -0600 (CST) Message-ID: <200502050351.j153pLL14720@raven.dms.auburn.edu> References: <00cb01c50ad3$5f978570$0200a8c0@sedrcw11488> <010101c50aed$d57b4640$0200a8c0@sedrcw11488> <004501c50b07$6690f620$0200a8c0@sedrcw11488> NNTP-Posting-Host: main.gmane.org X-Trace: sea.gmane.org 1107576847 14944 80.91.229.2 (5 Feb 2005 04:14:07 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Sat, 5 Feb 2005 04:14:07 +0000 (UTC) Cc: emacs-devel@gnu.org Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Sat Feb 05 05:14:07 2005 Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1CxHKb-00054v-G8 for ged-emacs-devel@m.gmane.org; Sat, 05 Feb 2005 05:14:01 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1CxHYF-0006Ot-B0 for ged-emacs-devel@m.gmane.org; Fri, 04 Feb 2005 23:28:07 -0500 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1CxHXl-0006HE-Ho for emacs-devel@gnu.org; Fri, 04 Feb 2005 23:27:37 -0500 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1CxHXW-0006C7-1w for emacs-devel@gnu.org; Fri, 04 Feb 2005 23:27:25 -0500 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1CxHXV-000680-UC for emacs-devel@gnu.org; Fri, 04 Feb 2005 23:27:21 -0500 Original-Received: from [131.204.53.104] (helo=manatee.dms.auburn.edu) by monty-python.gnu.org with esmtp (Exim 4.34) id 1CxGzy-0000pP-ST for emacs-devel@gnu.org; Fri, 04 Feb 2005 22:52:43 -0500 Original-Received: from raven.dms.auburn.edu (raven.dms.auburn.edu [131.204.53.29]) by manatee.dms.auburn.edu (8.12.10/8.12.10) with ESMTP id j153qg9N007979; Fri, 4 Feb 2005 21:52:42 -0600 (CST) Original-Received: (from teirllm@localhost) by raven.dms.auburn.edu (8.11.7p1+Sun/8.11.7) id j153pLL14720; Fri, 4 Feb 2005 21:51:21 -0600 (CST) X-Authentication-Warning: raven.dms.auburn.edu: teirllm set sender to teirllm@dms.auburn.edu using -f Original-To: lennart.borgman.073@student.lu.se In-reply-to: <004501c50b07$6690f620$0200a8c0@sedrcw11488> (lennart.borgman.073@student.lu.se) X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org X-MailScanner-To: ged-emacs-devel@m.gmane.org Xref: main.gmane.org gmane.emacs.devel:32896 X-Report-Spam: http://spam.gmane.org/gmane.emacs.devel:32896 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)) ============================================================