From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: "Richard M. Stallman" Newsgroups: gmane.emacs.devel Subject: Re: Description of custom-add-option in Info Date: Fri, 01 Jul 2005 00:03:53 -0400 Message-ID: References: <42C1DF54.4030505@student.lu.se> Reply-To: rms@gnu.org NNTP-Posting-Host: main.gmane.org X-Trace: sea.gmane.org 1120190446 10280 80.91.229.2 (1 Jul 2005 04:00:46 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Fri, 1 Jul 2005 04:00:46 +0000 (UTC) Cc: emacs-devel@gnu.org Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Fri Jul 01 06:00:45 2005 Return-path: Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1DoChi-0006Gg-2c for ged-emacs-devel@m.gmane.org; Fri, 01 Jul 2005 06:00:38 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1DoCq5-00052q-Je for ged-emacs-devel@m.gmane.org; Fri, 01 Jul 2005 00:09:17 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1DoCpf-0004wq-QT for emacs-devel@gnu.org; Fri, 01 Jul 2005 00:08:52 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1DoCpZ-0004tk-2p for emacs-devel@gnu.org; Fri, 01 Jul 2005 00:08:45 -0400 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1DoCpY-0004sE-KC for emacs-devel@gnu.org; Fri, 01 Jul 2005 00:08:44 -0400 Original-Received: from [199.232.76.164] (helo=fencepost.gnu.org) by monty-python.gnu.org with esmtp (Exim 4.34) id 1DoCrd-0003SG-5T for emacs-devel@gnu.org; Fri, 01 Jul 2005 00:10:53 -0400 Original-Received: from rms by fencepost.gnu.org with local (Exim 4.34) id 1DoCkr-0000lB-NH; Fri, 01 Jul 2005 00:03:53 -0400 Original-To: Lennart Borgman In-reply-to: <42C1DF54.4030505@student.lu.se> (message from Lennart Borgman on Wed, 29 Jun 2005 01:37:56 +0200) 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:39999 X-Report-Spam: http://spam.gmane.org/gmane.emacs.devel:39999 The description of custom-add-option on Info page 14.3 is not consistent with the defun doc string. Is this right? *** custom.el 13 Apr 2005 13:41:46 -0400 1.83 --- custom.el 30 Jun 2005 21:18:28 -0400 *************** *** 486,493 **** (defun custom-add-option (symbol option) "To the variable SYMBOL add OPTION. ! If SYMBOL is a hook variable, OPTION should be a hook member. ! For other types variables, the effect is undefined." (let ((options (get symbol 'custom-options))) (unless (member option options) (put symbol 'custom-options (cons option options))))) --- 486,495 ---- (defun custom-add-option (symbol option) "To the variable SYMBOL add OPTION. ! If SYMBOL's custom type is a hook, OPTION should be a hook member. ! If SYMBOL's custom type is an alist, OPTION specifies a symbol ! to offer to the user as a possible key in the alist. ! For other custom types, this has no effect." (let ((options (get symbol 'custom-options))) (unless (member option options) (put symbol 'custom-options (cons option options)))))