From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/28224
Path: main.gmane.org!not-for-mail
From: Jan Vroonhof <vroonhof@math.ethz.ch>
Newsgroups: gmane.emacs.gnus.general
Subject: Re: cl
Date: 14 Dec 1999 19:55:27 +0100
Sender: owner-ding@hpc.uh.edu
Message-ID: <byd7s9uzc0.fsf@bolzano.math.ethz.ch>
References: <yosu3dt6m9tj.fsf@jpl.org> <9t9ln6xrdkt.fsf@mraz.iskon.hr> <yosuaend7nyk.fsf@jpl.org>
NNTP-Posting-Host: coloc-standby.netfonds.no
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
X-Trace: main.gmane.org 1035165111 28781 80.91.224.250 (21 Oct 2002 01:51:51 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Mon, 21 Oct 2002 01:51:51 +0000 (UTC)
Return-Path: <owner-ding@hpc.uh.edu>
Original-Received: from farabi.math.uh.edu (farabi.math.uh.edu [129.7.128.57])
	by sclp3.sclp.com (8.8.5/8.8.5) with ESMTP id NAA16760
	for <jason@mailhost.sclp.com>; Tue, 14 Dec 1999 13:59:58 -0500 (EST)
Original-Received: from sina.hpc.uh.edu (lists@Sina.HPC.UH.EDU [129.7.3.5])
	by farabi.math.uh.edu (8.9.3/8.9.1) with ESMTP id MAB28728;
	Tue, 14 Dec 1999 12:56:08 -0600 (CST)
Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Tue, 14 Dec 1999 12:56:16 -0600 (CST)
Original-Received: from sclp3.sclp.com (root@sclp3.sclp.com [204.252.123.139])
	by sina.hpc.uh.edu (8.9.3/8.9.3) with ESMTP id MAA09053
	for <ding@hpc.uh.edu>; Tue, 14 Dec 1999 12:56:02 -0600 (CST)
Original-Received: from frege.math.ethz.ch (daemon@frege-d-math-north-g-west.math.ethz.ch [129.132.145.3])
	by sclp3.sclp.com (8.8.5/8.8.5) with ESMTP id NAA16665
	for <ding@gnus.org>; Tue, 14 Dec 1999 13:55:40 -0500 (EST)
Original-Received: (from daemon@localhost)
	by frege.math.ethz.ch (8.9.1/8.9.1) id TAA01635
	for <ding@gnus.org>; Tue, 14 Dec 1999 19:55:37 +0100 (MET)
Original-Received: from bolzano(129.132.146.140)
 via SMTP by frege, id smtpdAAAa000PX; Tue Dec 14 19:55:27 1999
Original-Received: (vroonhof@localhost) by bolzano (SMI-8.6/D-MATH-client) id TAA04960; Tue, 14 Dec 1999 19:55:27 +0100
Original-To: ding@gnus.org
In-Reply-To: Katsumi Yamaoka's message of "Tue, 14 Dec 1999 11:38:52 GMT"
Original-Lines: 22
User-Agent: Gnus/5.0803 (Gnus v5.8.3) XEmacs/21.1 (Bryce Canyon)
Precedence: list
X-Majordomo: 1.94.jlt7
Xref: main.gmane.org gmane.emacs.gnus.general:28224
X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:28224

Katsumi Yamaoka <yamaoka@jpl.org> writes:

> Hrvoje> Could you please code these things so that they are not called
> Hrvoje> under XEmacs, where cl.el is "official"?
> 
> Okay, thanks for the advice.  This is a replacement of the patch.
> 
> 
> --- dgnushack.el~	Mon Dec  6 02:04:45 1999
> +++ dgnushack.el	Tue Dec 14 11:34:55 1999
> @@ -30,6 +30,83 @@
>  
>  (require 'cl)
>  
> +(define-compiler-macro last (&whole form x &optional n)
> +  (if (or (featurep 'xemacs)
> +	  (and (fboundp 'last)

Why not wrap the whole thing an
(unless (featurep 'xemacs) ..)

Jan