From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/26156 Path: main.gmane.org!not-for-mail From: Shenghuo ZHU Newsgroups: gmane.emacs.gnus.general Subject: Re: mailcap-viewer-lessp is just plain wrong Date: 03 Nov 1999 15:33:35 -0500 Organization: U of Rochester Sender: owner-ding@hpc.uh.edu Message-ID: <5bbt9bfh7k.fsf@brain.cs.rochester.edu> References: <87aeoyvw1b.fsf@pazuzu.eudaemonia.org> <5bpuxtoqgm.fsf@giga.cs.rochester.edu> <871za9ov5p.fsf@pazuzu.eudaemonia.org> NNTP-Posting-Host: coloc-standby.netfonds.no Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-Trace: main.gmane.org 1035163418 17930 80.91.224.250 (21 Oct 2002 01:23:38 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Mon, 21 Oct 2002 01:23:38 +0000 (UTC) Return-Path: Original-Received: from lisa.math.uh.edu (lisa.math.uh.edu [129.7.128.49]) by sclp3.sclp.com (8.8.5/8.8.5) with ESMTP id PAA00203 for ; Wed, 3 Nov 1999 15:34:19 -0500 (EST) Original-Received: from sina.hpc.uh.edu (lists@Sina.HPC.UH.EDU [129.7.3.5]) by lisa.math.uh.edu (8.9.1/8.9.1) with ESMTP id OAB18375; Wed, 3 Nov 1999 14:34:12 -0600 (CST) Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Wed, 03 Nov 1999 14:34:30 -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 OAA24796 for ; Wed, 3 Nov 1999 14:34:17 -0600 (CST) Original-Received: from cayuga.cs.rochester.edu (cayuga.cs.rochester.edu [192.5.53.209]) by sclp3.sclp.com (8.8.5/8.8.5) with ESMTP id PAA00195 for ; Wed, 3 Nov 1999 15:33:37 -0500 (EST) Original-Received: from brain.cs.rochester.edu (brain.cs.rochester.edu [192.5.53.111]) by cayuga.cs.rochester.edu (8.9.3/Q) with ESMTP id PAA05176 for ; Wed, 3 Nov 1999 15:33:36 -0500 (EST) Original-Received: (from zsh@localhost) by brain.cs.rochester.edu (8.9.1b+Sun/Q++) id PAA27259; Wed, 3 Nov 1999 15:33:35 -0500 (EST) Original-To: ding@gnus.org X-Attribution: ZSH X-Face: 'IF:e51ib'Qbl^(}l^&4-J`'P!@[4~O|&k#:@Gld#b/]oMq&`&FVY._3+b`mzp~Jeve~/#/ ERD!OTe<86UhyN=l`mrPY)M7_}`Ktt\K+58Z!hu7>qU,i.N7TotU[FYE(f1;}`g2xj!u*l`^&=Q!g{ *q|ddto|nkt"$r,K$[)"|6,elPH= GJ6Q In-Reply-To: Mark Buda's message of "02 Nov 1999 08:55:14 -0500" Original-Lines: 35 User-Agent: Gnus/5.07009701 (Pterodactyl Gnus v0.97.1) Emacs/20.4 Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:26156 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:26156 --=-=-= >>>>> "Mark" == Mark Buda writes: [...] Mark> (cond Mark> ; if only one is wild, the other one is better Mark> ((and x-wild (not y-wild)) Mark> nil) Mark> ((and (not x-wild) y-wild) Mark> t) Mark> ; otherwise, if only one is lisp, it is better Mark> ((and x-lisp (not y-lisp)) Mark> t) Mark> ((and (not x-lisp) y-lisp) Mark> nil) This condition is not necessary. Mark> ; otherwise, compare them some other arbitrary way Mark> (t Mark> (blah blah blah))) Done. Committed to CVS. -- Shenghuo ZHU 1999-11-03 15:27:38 Shenghuo ZHU * mailcap.el (mailcap-viewer-lessp): Fix bug. --=-=-= Content-Type: text/x-patch Content-Disposition: attachment; filename=97-121.diff Index: mailcap.el =================================================================== RCS file: /usr/local/cvsroot/gnus/lisp/mailcap.el,v retrieving revision 5.23 diff -u -r5.23 mailcap.el --- mailcap.el 1999/07/09 19:28:56 5.23 +++ mailcap.el 1999/11/03 20:29:40 @@ -623,11 +623,11 @@ (x-lisp (not (stringp (or (cdr-safe (assq 'viewer x)) "")))) (y-lisp (not (stringp (or (cdr-safe (assq 'viewer y)) ""))))) (cond - ((and x-lisp (not y-lisp)) - t) - ((and (not y-lisp) x-wild (not y-wild)) - t) + ((and x-wild (not y-wild)) + nil) ((and (not x-wild) y-wild) + t) + ((and (not y-lisp) x-lisp) t) (t nil)))) --=-=-= --=-=-=--