From xemacs-m  Mon Mar 10 14:12:05 1997
Received: from corona.pixar.com (corona.pixar.com [138.72.20.84])
	by xemacs.org (8.8.5/8.8.5) with SMTP id OAA03077
	for <xemacs-beta@xemacs.org>; Mon, 10 Mar 1997 14:12:05 -0600 (CST)
Received: by corona.pixar.com (Smail3.1.29.1 #2)
	id m0w4BOg-0001YWC; Mon, 10 Mar 97 12:10 PST
Sender: retnuh@pixar.com (Hunter Kelly)
Sender: retnuh@corona
To: xemacs-beta@xemacs.org
Subject: Re: more fonst madness! [WAS Re: 20.1-b5: Setting fonts?]
References: <199703062143.QAA07193@spacely.icd.teradyne.com> 	<m3afog31we.fsf@jens.metrix.de> <199703071540.KAA05372@anthem.CNRI.Reston.Va.US> <yvtybbz82il.fsf@corona.pixar.com> <m24tenvv2t.fsf@altair.xemacs.org> <yvtvi737xh7.fsf_-_@corona.pixar.com> <rjendqvh08.fsf@zuse.dina.kvl.dk> <yvtsp238t6p.fsf@corona.pixar.com> <m2zpwbcyqa.fsf@altair.xemacs.org>
Mime-Version: 1.0 (generated by tm-edit 7.105)
Content-Type: text/plain; charset=US-ASCII
From: Hunter Kelly <retnuh@corona.pixar.com>
Date: 10 Mar 1997 12:10:13 -0800
In-Reply-To: Steven L Baur's message of 10 Mar 1997 11:51:09 -0800
Message-ID: <yvtohcr8q56.fsf@corona.pixar.com>
Lines: 36
X-Mailer: Gnus v5.4.17/XEmacs 19.15

Exaclty!

H

Steven L Baur <steve@miranova.com> writes:

> Hunter Kelly writes:
> 
> > Steven, do you want me to whip up a patch to fix the above error?
> 
> If I understand correctly the second part of the or drops away like
> this?
> 
> Index: lisp/x11/x-menubar.el
> ===================================================================
> RCS file: /usr/local/xemacs/xemacs-20.0/lisp/x11/x-menubar.el,v
> retrieving revision 1.12
> diff -u -r1.12 x-menubar.el
> --- x-menubar.el	1997/03/08 23:27:17	1.12
> +++ x-menubar.el	1997/03/10 19:49:30
> @@ -1209,9 +1209,8 @@
>    "This function will return a list of all faces that have not been
>  'customized'."
>    (delq nil (mapcar '(lambda (face)
> -		       (if (not (or (get face 'saved-face)
> -				   (get face 'factory-face)))
> -			  face))
> +		       (unless (get face 'saved-face)
> +			 face))
>  		    (face-list))))
>  
>  (defun save-options-specifier-spec-list (face property)
> 
> -- 
> steve@miranova.com baur
> Unsolicited commercial e-mail will be billed at $250/message.

