From xemacs-m  Thu Apr 17 06:51:54 1997
Received: from jagor.srce.hr (hniksic@jagor.srce.hr [161.53.2.130])
	by xemacs.org (8.8.5/8.8.5) with ESMTP id GAA28964
	for <xemacs-beta@xemacs.org>; Thu, 17 Apr 1997 06:51:53 -0500 (CDT)
Received: (from hniksic@localhost)
          by jagor.srce.hr (8.8.5/8.8.4)
	  id NAA10746; Thu, 17 Apr 1997 13:50:15 +0200 (MET DST)
To: Per Abrahamsen <abraham@dina.kvl.dk>
Cc: xemacs-beta@xemacs.org, emacs-custom@sunsite.auc.dk
Subject: Re: CL features
References: <9704170206.AA19728@thymus.synaptics.com> <rj3esq9d9s.fsf@zuse.dina.kvl.dk>
X-URL: ftp://gnjilux.cc.fer.hr/pub/unix/util/wget/
X-Attribution: Hrv
X-Face: 4Ep[g9-@0E(fGis\iN[=/j-3#q82z/#$d-3q-m+|V4y|W8pzaCVLawV3
        zk,w0umo:w7z{fL[(\UWyN2s:]}@qZeG"}HLw\c7QjaRrxc+=Ho&3*
        'g{&(4bh\8g5^xF(9(kD2PYOYfzgn|0wLH^3;Y)
From: Hrvoje Niksic <hniksic@srce.hr>
Date: 17 Apr 1997 13:50:14 +0200
In-Reply-To: Per Abrahamsen's message of 17 Apr 1997 12:03:59 +0200
Message-ID: <kig2089zx55.fsf@jagor.srce.hr>
Lines: 24
X-Mailer: Gnus v5.4.45/XEmacs 19.15

Per Abrahamsen <abraham@dina.kvl.dk> writes:

> `setf' is nice, and I don't think it would be too hard to make the
> `:set' argument to `defcustom' work as the initial `setf' function for
> that variable.  I'm not sure it is desirable though.

I don't think it's desirable either.  Not all the stuff `:set' should
operate on is covered with `setf' forms -- nor should it be.

The idea is that instead of :set and :get you specify just one form,
which would either be evaluated, or set through `setf'.  This works
fine for the simple stuff; e.g. (setf (default-value SYMBOL) VALUE)
does expand to the appropriate `set-default' form, but it also
requires that for every single function of mine I also install a
`setf' form!

That (having various new functions) is not how `setf' was meant to be
used, but it is certainly applicable to custom's :set and :get, which
is why I think `setf' is not desirable.

-- 
Hrvoje Niksic <hniksic@srce.hr> | Student at FER Zagreb, Croatia
--------------------------------+--------------------------------
Good pings come in small packets.

