From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/41439 Path: main.gmane.org!not-for-mail From: Steve Youngs Newsgroups: gmane.emacs.gnus.general Subject: [PATCH] XEmacs doesn't understand ':keys' Date: Thu, 03 Jan 2002 03:47:52 +1000 Organization: The XEmacs Development Team Sender: owner-ding@hpc.uh.edu Message-ID: NNTP-Posting-Host: coloc-standby.netfonds.no Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: main.gmane.org 1035176834 6132 80.91.224.250 (21 Oct 2002 05:07:14 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Mon, 21 Oct 2002 05:07:14 +0000 (UTC) Return-Path: Original-Received: (qmail 27645 invoked from network); 2 Jan 2002 17:49:45 -0000 Original-Received: from malifon.math.uh.edu (mail@129.7.128.13) by mastaler.com with SMTP; 2 Jan 2002 17:49:45 -0000 Original-Received: from sina.hpc.uh.edu ([129.7.128.10] ident=lists) by malifon.math.uh.edu with esmtp (Exim 3.20 #1) id 16LpVz-0005fR-00; Wed, 02 Jan 2002 11:49:23 -0600 Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Wed, 02 Jan 2002 11:49:16 -0600 (CST) Original-Received: from sclp3.sclp.com (qmailr@sclp3.sclp.com [209.196.61.66]) by sina.hpc.uh.edu (8.9.3/8.9.3) with SMTP id LAA24541 for ; Wed, 2 Jan 2002 11:49:05 -0600 (CST) Original-Received: (qmail 27625 invoked by alias); 2 Jan 2002 17:49:07 -0000 Original-Received: (qmail 27620 invoked from network); 2 Jan 2002 17:49:06 -0000 Original-Received: from mail014.syd.optusnet.com.au (203.2.75.175) by gnus.org with SMTP; 2 Jan 2002 17:49:06 -0000 Original-Received: from slackware.mynet.pc (wdcax17-073.dialup.optusnet.com.au [198.142.137.73]) by mail014.syd.optusnet.com.au (8.11.1/8.11.1) with ESMTP id g02Hmda07148 for ; Thu, 3 Jan 2002 04:48:39 +1100 Original-Received: (from steve@localhost) by slackware.mynet.pc (8.12.0.Beta7/8.12.0.Beta7) id g02Hlw8I006678; Thu, 3 Jan 2002 03:47:58 +1000 Mail-Copies-To: never Original-To: Gnus List X-Attribution: SY X-URL: X-Face: %@A&y\ef)A6pi|q43;M>uyhO)~NP*fpdo0XrUuutf0|nku\O5JV(7EG%odc'n6}G@tYRl+B #[n,%B`.sHZ5>3MZvrm%,rWE7)c}ZXjH\>=p@AL\y\gyu|.lJ8B`F++86 Original-Lines: 39 User-Agent: Gnus/5.090005 (Oort Gnus v0.05) XEmacs/21.5 (asparagus, i686-pc-linux) Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:41439 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:41439 Without this, latest CVS is broke for XEmacs. Index: lisp/ChangeLog =================================================================== RCS file: /usr/local/cvsroot/gnus/lisp/ChangeLog,v retrieving revision 6.999 diff -u -w -U0 -r6.999 ChangeLog --- lisp/ChangeLog 2002/01/02 17:19:28 6.999 +++ lisp/ChangeLog 2002/01/02 17:45:56 @@ -0,0 +1,5 @@ +2002-01-03 Steve Youngs + + * gnus-sum.el (gnus-summary-make-menu-bar): XEmacs doesn't + understand ':keys', wrap it in an featurep 'xemacs. + Index: lisp/gnus-sum.el =================================================================== RCS file: /usr/local/cvsroot/gnus/lisp/gnus-sum.el,v retrieving revision 6.147 diff -u -w -r6.147 gnus-sum.el --- lisp/gnus-sum.el 2002/01/02 16:57:09 6.147 +++ lisp/gnus-sum.el 2002/01/02 17:46:42 @@ -2013,7 +2013,9 @@ ["Fetch article with id..." gnus-summary-refer-article t] ["Setup Mailing List Params" gnus-mailing-list-insinuate t] ["Redisplay" gnus-summary-show-article t] - ["Raw article" gnus-summary-show-raw-article t :keys "C-u g"]))) + ["Raw article" gnus-summary-show-raw-article + ,@(if (featurep 'xemacs) '(t) + '(:keys "C-u g"))]))) (easy-menu-define gnus-summary-article-menu gnus-summary-mode-map "" (cons "Article" innards)) -- |---------------------| | XEmacs - It's not just an editor. | | It's a way of life. | |---------------------------------------|