From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: Andreas Schwab Newsgroups: gmane.emacs.devel Subject: Re: Mule-UCS 0.84 (KOUGETSUDAI) release. Date: Thu, 05 Dec 2002 11:47:38 +0100 Sender: emacs-devel-admin@gnu.org Message-ID: References: <20021104.103826.71116326.05@tats.iris.ne.jp> <20021105.202038.18871060.05@tats.iris.ne.jp> <20021129.215347.74727519.05@tats.iris.ne.jp> <20021202.175121.98551706.wl@gnu.org> <200212050815.RAA19189@etlken.m17n.org> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=iso-8859-1 Content-Transfer-Encoding: 8bit X-Trace: main.gmane.org 1039085424 31588 80.91.224.249 (5 Dec 2002 10:50:24 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Thu, 5 Dec 2002 10:50:24 +0000 (UTC) Cc: mule@m17n.org, tats@vega.ocn.ne.jp, emacs-devel@gnu.org, himi@meadowy.org Return-path: Original-Received: from quimby.gnus.org ([80.91.224.244]) by main.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 18JtaF-0008DJ-00 for ; Thu, 05 Dec 2002 11:50:19 +0100 Original-Received: from monty-python.gnu.org ([199.232.76.173]) by quimby.gnus.org with esmtp (Exim 3.12 #1 (Debian)) id 18Jtkf-0001D3-00 for ; Thu, 05 Dec 2002 12:01:05 +0100 Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org) by monty-python.gnu.org with esmtp (Exim 4.10.13) id 18JtYC-0003HZ-00; Thu, 05 Dec 2002 05:48:12 -0500 Original-Received: from list by monty-python.gnu.org with tmda-scanned (Exim 4.10.13) id 18JtXl-0002wY-00 for emacs-devel@gnu.org; Thu, 05 Dec 2002 05:47:45 -0500 Original-Received: from mail by monty-python.gnu.org with spam-scanned (Exim 4.10.13) id 18JtXi-0002rs-00 for emacs-devel@gnu.org; Thu, 05 Dec 2002 05:47:44 -0500 Original-Received: from ns.suse.de ([213.95.15.193] helo=Cantor.suse.de) by monty-python.gnu.org with esmtp (Exim 4.10.13) id 18JtXi-0002p0-00 for emacs-devel@gnu.org; Thu, 05 Dec 2002 05:47:42 -0500 Original-Received: from Hermes.suse.de (Charybdis.suse.de [213.95.15.201]) by Cantor.suse.de (Postfix) with ESMTP id 2E3B11462E; Thu, 5 Dec 2002 11:47:41 +0100 (MET) X-Authentication-Warning: sykes.suse.de: schwab set sender to schwab@suse.de using -f Original-To: Kenichi Handa X-Yow: Yow! And then we could sit on the hoods of cars at stop lights! In-Reply-To: <200212050815.RAA19189@etlken.m17n.org> (Kenichi Handa's message of "Thu, 5 Dec 2002 17:15:27 +0900 (JST)") Original-Lines: 44 User-Agent: Gnus/5.090007 (Oort Gnus v0.07) Emacs/21.3.50 (ia64-suse-linux) Errors-To: emacs-devel-admin@gnu.org X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.0.11 Precedence: bulk List-Help: List-Post: List-Subscribe: , List-Id: Emacs development discussions. List-Unsubscribe: , List-Archive: Xref: main.gmane.org gmane.emacs.devel:9877 X-Report-Spam: http://spam.gmane.org/gmane.emacs.devel:9877 Kenichi Handa writes: |> *** mucs.el 2002/12/05 07:53:41 1.1 |> --- mucs.el 2002/12/05 07:55:59 |> *************** |> *** 196,203 **** |> (funcall (car hookval)) |> result) |> hookval (cdr hookval))) |> ! (cons 'progn |> ! result))) |> |> (defmacro mucs-define-package (package &rest form) |> "Enclose a unit of package with this. |> --- 196,202 ---- |> (funcall (car hookval)) |> result) |> hookval (cdr hookval))) |> ! result)) |> |> (defmacro mucs-define-package (package &rest form) |> "Enclose a unit of package with this. IMHO this patch is better: --- mucs.el 2002/12/05 10:43:28 1.1 +++ mucs.el 2002/12/05 10:46:26 @@ -196,7 +196,7 @@ In order to embed data or lisp code, use (funcall (car hookval)) result) hookval (cdr hookval))) - (cons 'progn + (list 'progn result))) (defmacro mucs-define-package (package &rest form) Andreas. -- Andreas Schwab, SuSE Labs, schwab@suse.de SuSE Linux AG, Deutschherrnstr. 15-19, D-90429 Nürnberg Key fingerprint = 58CA 54C7 6D53 942B 1756 01D3 44D5 214B 8276 4ED5 "And now for something completely different."