From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Dan Nicolaescu Newsgroups: gmane.emacs.devel Subject: defcustom standard-value (was: Re: BASE_PURESIZE) Date: Thu, 29 Oct 2009 18:17:18 -0700 (PDT) Message-ID: <200910300117.n9U1HIgs014051@godzilla.ics.uci.edu> References: <8363a6gytm.fsf@gnu.org> <834opqgpzs.fsf@gnu.org> <83skd9f6ok.fsf@gnu.org> <83ljj1exq6.fsf@gnu.org> <200910241727.n9OHReEu007324@godzilla.ics.uci.edu> <200910250824.n9P8OlUp013541@godzilla.ics.uci.edu> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: ger.gmane.org 1256865657 13975 80.91.229.12 (30 Oct 2009 01:20:57 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Fri, 30 Oct 2009 01:20:57 +0000 (UTC) Cc: Eli Zaretskii , Andreas Schwab , emacs-devel@gnu.org To: Stefan Monnier Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Fri Oct 30 02:20:49 2009 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.50) id 1N3gAa-0002U9-3j for ged-emacs-devel@m.gmane.org; Fri, 30 Oct 2009 02:20:48 +0100 Original-Received: from localhost ([127.0.0.1]:54351 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1N3gAX-0000i1-19 for ged-emacs-devel@m.gmane.org; Thu, 29 Oct 2009 21:20:45 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1N3gAO-0000es-Jr for emacs-devel@gnu.org; Thu, 29 Oct 2009 21:20:36 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1N3gAJ-0000Ze-5f for emacs-devel@gnu.org; Thu, 29 Oct 2009 21:20:35 -0400 Original-Received: from [199.232.76.173] (port=47803 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1N3gAI-0000ZG-VI for emacs-devel@gnu.org; Thu, 29 Oct 2009 21:20:30 -0400 Original-Received: from john-pertwee-v0.ics.uci.edu ([128.195.1.165]:46560) by monty-python.gnu.org with esmtps (TLS-1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1N3gAG-0005du-NG; Thu, 29 Oct 2009 21:20:29 -0400 Original-Received: from godzilla.ics.uci.edu (godzilla.ics.uci.edu [128.195.10.101]) by john-pertwee-v0.ics.uci.edu (8.13.8/8.13.8) with ESMTP id n9U1HJEb030727 (version=TLSv1/SSLv3 cipher=DHE-RSA-AES256-SHA bits=256 verify=NO); Thu, 29 Oct 2009 18:17:19 -0700 Original-Received: (from dann@localhost) by godzilla.ics.uci.edu (8.13.8+Sun/8.13.6/Submit) id n9U1HIgs014051; Thu, 29 Oct 2009 18:17:18 -0700 (PDT) In-Reply-To: <200910250824.n9P8OlUp013541@godzilla.ics.uci.edu> (Dan Nicolaescu's message of "Sun, 25 Oct 2009 01:24:47 -0700 (PDT)") Original-Lines: 37 X-ICS-MailScanner-Information: Please send mail to helpdesk@ics.uci.edu or more information X-ICS-MailScanner-ID: n9U1HJEb030727 X-ICS-MailScanner: Found to be clean X-ICS-MailScanner-SpamCheck: not spam, SpamAssassin (not cached, score=-1.44, required 5, autolearn=disabled, ALL_TRUSTED -1.44) X-ICS-MailScanner-From: dann@godzilla.ics.uci.edu X-detected-operating-system: by monty-python.gnu.org: GNU/Linux 2.6 (newer, 3) 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 Xref: news.gmane.org gmane.emacs.devel:116452 Archived-At: Dan Nicolaescu writes: > Another issue that I hit: > > Changing (in files.el) > > From: > (defcustom directory-free-space-program "df" > to: > (defcustom directory-free-space-program (purecopy "df") > > does not get rid of the "df" string in GC memory. The reason is > > ELISP> (get 'directory-free-space-program 'standard-value) > ((purecopy "df")) > > BTW, this is not a problem for autoloaded defcustoms, they get > transformed into defvars in loaddefs.el. Is this patch TRTD? Index: lisp/custom.el =================================================================== RCS file: /cvsroot/emacs/emacs/lisp/custom.el,v retrieving revision 1.149 diff -u -3 -p -r1.149 custom.el --- lisp/custom.el 15 Sep 2009 04:08:04 -0000 1.149 +++ lisp/custom.el 29 Oct 2009 07:50:00 -0000 @@ -131,7 +131,7 @@ not the default value itself. DEFAULT is stored as SYMBOL's standard value, in SYMBOL's property `standard-value'. At the same time, SYMBOL's property `force-value' is set to nil, as the value is no longer rogue." - (put symbol 'standard-value (list default)) + (put symbol 'standard-value (purecopy (list default))) ;; Maybe this option was rogue in an earlier version. It no longer is. (when (get symbol 'force-value) (put symbol 'force-value nil))