From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: Vinicius Jose Latorre Newsgroups: gmane.emacs.devel Subject: Re: printing.el again Date: Mon, 15 Nov 2004 18:03:01 -0200 Message-ID: <41990B75.1080603@ig.com.br> References: <419779C4.50909@ig.com.br> <871xew44v1.fsf-monnier+emacs@gnu.org> NNTP-Posting-Host: deer.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1; format=flowed Content-Transfer-Encoding: 7bit X-Trace: sea.gmane.org 1100549150 7051 80.91.229.6 (15 Nov 2004 20:05:50 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Mon, 15 Nov 2004 20:05:50 +0000 (UTC) Cc: emacs-devel@gnu.org Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Mon Nov 15 21:05:37 2004 Return-path: Original-Received: from lists.gnu.org ([199.232.76.165]) by deer.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 1CTn6W-0002IF-00 for ; Mon, 15 Nov 2004 21:05:36 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.33) id 1CTnFE-0001Se-Oa for ged-emacs-devel@m.gmane.org; Mon, 15 Nov 2004 15:14:36 -0500 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.33) id 1CTnF8-0001SZ-BW for emacs-devel@gnu.org; Mon, 15 Nov 2004 15:14:30 -0500 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.33) id 1CTnF7-0001SN-Ux for emacs-devel@gnu.org; Mon, 15 Nov 2004 15:14:30 -0500 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.33) id 1CTnF7-0001SK-TA for emacs-devel@gnu.org; Mon, 15 Nov 2004 15:14:29 -0500 Original-Received: from [200.221.11.58] (helo=smtp.uol.com.br) by monty-python.gnu.org with esmtp (Exim 4.34) id 1CTn5p-0006K6-9h for emacs-devel@gnu.org; Mon, 15 Nov 2004 15:04:53 -0500 Original-Received: from [200.183.90.28] (unknown [200.183.90.28]) by scorpion5.uol.com.br (Postfix) with ESMTP id E32CFA95D; Mon, 15 Nov 2004 18:05:31 -0200 (BRST) User-Agent: Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.8a4) Gecko/20040927 X-Accept-Language: en-us, en Original-To: Stefan Monnier In-Reply-To: <871xew44v1.fsf-monnier+emacs@gnu.org> 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: main.gmane.org gmane.emacs.devel:29885 X-Report-Spam: http://spam.gmane.org/gmane.emacs.devel:29885 > > Hummm, indeed, but this: > > > (let (... > > (pr-:help (if (eq ps-print-emacs-type 'emacs) > > #'(lambda (text) (list :help text)) ; GNU Emacs > > 'ignore))) ; XEmacs > > ...... > > ,@(funcall pr-:help ...) > > > Will do the work and pr-:help will be local. > > Yes, that's another solution. I find CL's `flet' much more elegant, tho. Ok, but a very long time ago there was a recommendation to do not use cl package when writing code in Emacs Lisp. Is that recommendation no more valid? > BTW, if you use (featurep 'xemacs) for the test, Emacs-21 will optimize the > test away (since the resulting elc file can't be run on XEmacs anyway). > Here it doesn't really matter, but it is sometimes very handy since it > ends up getting rid of spurious warnings about XEmacs-specific code. Well, so: A) (cond ((eq ps-print-emacs-type 'xemacs) ...) (t ...)) B) (cond ((featurep 'xemacs) ...) (t ...)) Are you saying that A and B above are treated differently by the byte-compiler?? Vinicius