From mboxrd@z Thu Jan  1 00:00:00 1970
Path: news.gmane.org!not-for-mail
From: "Richard M. Stallman" <rms@gnu.org>
Newsgroups: gmane.emacs.devel
Subject: Re: obsolete comment in tool-bar.el
Date: Wed, 13 Jul 2005 12:52:20 -0400
Message-ID: <E1DskT6-0007cR-Lr@fencepost.gnu.org>
References: <ubr5ewzzi.fsf@gmail.com>
	<200507071915.j67JFZT29961@raven.dms.auburn.edu>
	<E1Dqwpd-0006pY-7q@fencepost.gnu.org>
	<200507090357.j693vJR04940@raven.dms.auburn.edu>
	<ur7e8mn0c.fsf@gnu.org>
	<200507091357.j69DvYA06868@raven.dms.auburn.edu>
	<wlzmssirv4.wl%mituharu@math.s.chiba-u.ac.jp>
	<wlbr58b4gk.wl%mituharu@math.s.chiba-u.ac.jp>
	<200507121825.j6CIP2I03988@raven.dms.auburn.edu>
	<200507122358.j6CNwFu05457@raven.dms.auburn.edu>
Reply-To: rms@gnu.org
NNTP-Posting-Host: main.gmane.org
X-Trace: sea.gmane.org 1121273903 4535 80.91.229.2 (13 Jul 2005 16:58:23 GMT)
X-Complaints-To: usenet@sea.gmane.org
NNTP-Posting-Date: Wed, 13 Jul 2005 16:58:23 +0000 (UTC)
Cc: eliz@gnu.org, brakjoller@gmail.com, mituharu@math.s.chiba-u.ac.jp,
	emacs-devel@gnu.org
Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Wed Jul 13 18:58:21 2005
Return-path: <emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org>
Original-Received: from lists.gnu.org ([199.232.76.165])
	by ciao.gmane.org with esmtp (Exim 4.43)
	id 1DskYD-0006r4-2C
	for ged-emacs-devel@m.gmane.org; Wed, 13 Jul 2005 18:57:37 +0200
Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org)
	by lists.gnu.org with esmtp (Exim 4.43)
	id 1DskZt-000431-NO
	for ged-emacs-devel@m.gmane.org; Wed, 13 Jul 2005 12:59:21 -0400
Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43)
	id 1DskYW-00032d-P1
	for emacs-devel@gnu.org; Wed, 13 Jul 2005 12:57:57 -0400
Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43)
	id 1DskYK-0002tj-Ly
	for emacs-devel@gnu.org; Wed, 13 Jul 2005 12:57:47 -0400
Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org)
	by lists.gnu.org with esmtp (Exim 4.43) id 1DskYJ-0002rf-L8
	for emacs-devel@gnu.org; Wed, 13 Jul 2005 12:57:43 -0400
Original-Received: from [199.232.76.164] (helo=fencepost.gnu.org)
	by monty-python.gnu.org with esmtp (Exim 4.34) id 1Dske2-0004Kd-Cj
	for emacs-devel@gnu.org; Wed, 13 Jul 2005 13:03:38 -0400
Original-Received: from rms by fencepost.gnu.org with local (Exim 4.34)
	id 1DskT6-0007cR-Lr; Wed, 13 Jul 2005 12:52:20 -0400
Original-To: Luc Teirlinck <teirllm@dms.auburn.edu>
In-reply-to: <200507122358.j6CNwFu05457@raven.dms.auburn.edu> (message from
	Luc Teirlinck on Tue, 12 Jul 2005 18:58:15 -0500 (CDT))
X-BeenThere: emacs-devel@gnu.org
X-Mailman-Version: 2.1.5
Precedence: list
List-Id: "Emacs development discussions." <emacs-devel.gnu.org>
List-Unsubscribe: <http://lists.gnu.org/mailman/listinfo/emacs-devel>,
	<mailto:emacs-devel-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/pipermail/emacs-devel>
List-Post: <mailto:emacs-devel@gnu.org>
List-Help: <mailto:emacs-devel-request@gnu.org?subject=help>
List-Subscribe: <http://lists.gnu.org/mailman/listinfo/emacs-devel>,
	<mailto:emacs-devel-request@gnu.org?subject=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:40868
X-Report-Spam: http://spam.gmane.org/gmane.emacs.devel:40868

       I forgot that the argument to defcustom gets evaluated outside the
       :initialize function.  I will implement another solution.

I don't think so.  Here's the body of `defcustom':

  (nconc (list 'custom-declare-variable
	       (list 'quote symbol)
	       (list 'quote value)
	       doc)
	 args))

And here's what custom-initialize-set does:

  (unless (default-boundp symbol)
    (funcall (or (get symbol 'custom-set) 'set-default)
	     symbol
	     (if (get symbol 'saved-value)
		 (eval (car (get symbol 'saved-value)))
	       (eval value)))))


I think your code was right, so please reinstall it.


What led you to think this was wrong?