[AC21.5] 21.5 build failure

[Aidan Kehoe]

Thanks, Stephen!

 Ar an cúigiú lá déag de mí Bealtaine, scríobh Stephen J. Turnbull: 

 > APPROVE COMMIT 21.5
 > 
 > Vin Shelton writes:
 > 
 >  > >>Error occurred processing /opt/src/xemacs-21.5-2008-05-14/lisp/subr.el: Wrong number of arguments: (lambda (form a list &rest keys) "
 >  > Common Lisp lambda list:
 >  >   (member* FORM A LIST &rest KEYS)
 > 
 > *sigh*
 > 
 > This patch fixes the build and `make check' passes.  I believe it
 > implements the desired semantics.
 > 
 > diff -r 34b42224a066 lisp/ChangeLog
 > --- a/lisp/ChangeLog	Wed May 14 23:55:13 2008 +0200
 > +++ b/lisp/ChangeLog	Wed May 14 21:56:11 2008 -0700
 > @@ -0,0 +1,4 @@
 > +2008-05-14  Stephen J. Turnbull  <stephen at xemacs.org>
 > +
 > +	* subr.el (add-to-list): Fix Aidan's last commit.
 > +
 > 
 > diff -r 34b42224a066 lisp/subr.el
 > --- a/lisp/subr.el	Wed May 14 23:55:13 2008 +0200
 > +++ b/lisp/subr.el	Wed May 14 21:56:12 2008 -0700
 > @@ -402,8 +402,7 @@
 >  into a hook function that will be run only after loading the package.
 >  `eval-after-load' provides one way to do this.  In some cases
 >  other hooks, such as major mode hooks, can do the job."
 > -  (if (member* (member* element (symbol-value list-var)
 > -                        :test (or compare-fn #'equal)))
 > +  (if (member* element (symbol-value list-var) :test (or compare-fn #'equal))
 >        (symbol-value list-var)
 >      (set list-var
 >           (if append

-- 
¿Dónde estará ahora mi sobrino Yoghurtu Nghé, que tuvo que huir
precipitadamente de la aldea por culpa de la escasez de rinocerontes?