From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/11133 Path: main.gmane.org!not-for-mail From: Danny Siu Newsgroups: gmane.emacs.gnus.general Subject: gnus-5.4.55 - Patch for displaying group picons for foreign groups Date: 27 May 1997 15:26:30 -0700 Message-ID: NNTP-Posting-Host: coloc-standby.netfonds.no Mime-Version: 1.0 (generated by tm-edit 7.106) Content-Type: text/plain; charset=US-ASCII X-Trace: main.gmane.org 1035150894 28472 80.91.224.250 (20 Oct 2002 21:54:54 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Sun, 20 Oct 2002 21:54:54 +0000 (UTC) Cc: Lars Magne Ingebrigtsen Return-Path: Original-Received: from sandy.calag.com (root@sandy [206.190.83.128]) by altair.xemacs.org (8.8.5/8.8.5) with ESMTP id QAA14270 for ; Tue, 27 May 1997 16:13:18 -0700 Original-Received: from xemacs.org (xemacs.cs.uiuc.edu [128.174.252.16]) by sandy.calag.com (8.8.5/8.8.5) with ESMTP id QAA25040 for ; Tue, 27 May 1997 16:13:08 -0700 Original-Received: from ifi.uio.no (0@ifi.uio.no [129.240.64.2]) by xemacs.org (8.8.5/8.8.5) with SMTP id SAA18871 for ; Tue, 27 May 1997 18:12:15 -0500 (CDT) Original-Received: from claymore.vcinet.com (claymore.vcinet.com [208.205.12.23]) by ifi.uio.no with SMTP (8.6.11/ifi2.4) id for ; Wed, 28 May 1997 00:30:02 +0200 Original-Received: (qmail 31633 invoked by uid 504); 27 May 1997 22:30:00 -0000 Original-Received: (qmail 31630 invoked from network); 27 May 1997 22:30:00 -0000 Original-Received: from smtp-relay-1.Adobe.COM (192.150.11.1) by claymore.vcinet.com with SMTP; 27 May 1997 22:30:00 -0000 Original-Received: by smtp-relay-1.Adobe.COM (8.8.5) with ESMTP id PAA09577; Tue, 27 May 1997 15:26:40 -0700 (PDT) Original-Received: by inner-relay-1.Adobe.COM (8.7.5) with ESMTP id PAA15617; Tue, 27 May 1997 15:27:24 -0700 (PDT) Original-Received: by mail-345.corp.Adobe.COM (8.7.5) with ESMTP id PAA09129; Tue, 27 May 1997 15:28:17 -0700 (PDT) Original-Received: by odins (8.6.9) id PAA16393; Tue, 27 May 1997 15:26:30 -0700 Original-To: ding@gnus.org X-Location: San Jose, CA X-Disclaimer: My opinions, not my employer's. X-Url: http://www.csua.berkeley.edu/~dsiu X-Mailer: Gnus v5.4.55 with nnfolder X-Newsreader: Gnus v5.4.55 X-Emacs: 19.15 XEmacs Lucid X-Face: fHBvLrQQW(GRz#RNTAN(,')p8NGv}{6dMh\:?%*D\+8hgkiA_dub1@\,Y"r5'a8C(8e~cGG(WFTU\OlAqI[B?V7m'ZGkquvZ/d k~E"A"@WK;0mLF&\%W1kIC]O"z#/>YNUefE1%5/NUX;ml]@$nW;05Z9uZ/CqTz]A)+`1ROuF~||pG= k>Zi@hE- Original-Lines: 71 Original-Xref: altair.xemacs.org dgnus-list:1523 Xref: main.gmane.org gmane.emacs.gnus.general:11133 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:11133 In gnus-5.4.55, the group picons didn't show up correctly for foreign groups even if the picons exist. The patch that fixes the problam is attached. It is based on gnus-5.4.55. -- ^..^ '/..\" ( oo ) )~ m( oo )m ,, ,, /=-=-=-=-=-=-=-=-=-=-=-==-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=\ | Danny Dick-Fung Siu http://www-leland.stanford.edu/~dsiu | | Reference System Group http://www.csua.berkeley.edu/~dsiu | | Adobe Systems Incorporated E-Mail: | | "What do you expect from a | | Cal. Berkeley grad.?" | \=-=-=-=-=-=-=-=-=-=-=-==-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=/ diff -C5 lisp/ChangeLog lisp-new/ChangeLog *** lisp/ChangeLog Sun May 25 08:14:06 1997 --- lisp-new/ChangeLog Tue May 27 15:07:03 1997 *************** *** 1,5 **** --- 1,9 ---- + Tue May 27 15:03:30 1997 Danny Siu + + * gnus-picon.el (gnus-group-display-picons): use gnus-group-real-name so that picons for foreign groups display correctly. + Sun May 25 17:08:16 1997 Lars Magne Ingebrigtsen * gnus.el: Gnus v5.4.55 is released. Sun May 25 15:13:45 1997 Michael R. Cook diff -C5 lisp/gnus-picon.el lisp-new/gnus-picon.el *** lisp/gnus-picon.el Sat May 17 22:37:34 1997 --- lisp-new/gnus-picon.el Tue May 27 15:05:09 1997 *************** *** 340,354 **** (gnus-picons-prepare-for-annotations 'gnus-group-annotations) (if (null gnus-picons-piconsearch-url) (setq gnus-group-annotations (gnus-picons-display-pairs (gnus-picons-lookup-pairs (reverse (message-tokenize-header ! gnus-newsgroup-name ".")) gnus-picons-news-directories) t ".")) (push (list 'gnus-group-annotations 'search nil ! (message-tokenize-header gnus-newsgroup-name ".") (if (listp gnus-picons-news-directories) gnus-picons-news-directories (list gnus-picons-news-directories)) nil) gnus-picons-jobs-alist) --- 340,356 ---- (gnus-picons-prepare-for-annotations 'gnus-group-annotations) (if (null gnus-picons-piconsearch-url) (setq gnus-group-annotations (gnus-picons-display-pairs (gnus-picons-lookup-pairs (reverse (message-tokenize-header ! (gnus-group-real-name gnus-newsgroup-name) ! ".")) gnus-picons-news-directories) t ".")) (push (list 'gnus-group-annotations 'search nil ! (message-tokenize-header ! (gnus-group-real-name gnus-newsgroup-name) ".") (if (listp gnus-picons-news-directories) gnus-picons-news-directories (list gnus-picons-news-directories)) nil) gnus-picons-jobs-alist)