From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/7212 Path: main.gmane.org!not-for-mail From: David Worenklein Newsgroups: gmane.emacs.gnus.general Subject: nnmail-resplit-incoming Date: 15 Jul 1996 17:56:57 -0400 Sender: dcw@gcm.com Message-ID: NNTP-Posting-Host: coloc-standby.netfonds.no X-Trace: main.gmane.org 1035147553 6295 80.91.224.250 (20 Oct 2002 20:59:13 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Sun, 20 Oct 2002 20:59:13 +0000 (UTC) Return-Path: ding-request@ifi.uio.no Original-Received: from spork.callamer.com (root@spork.callamer.com [199.74.141.2]) by deanna.miranova.com (8.7.5/8.6.9) with ESMTP id PAA18106 for ; Mon, 15 Jul 1996 15:27:12 -0700 Original-Received: from ifi.uio.no (ifi.uio.no [129.240.64.2]) by spork.callamer.com (8.7.5/8.7.3) with SMTP id PAA04028 for ; Mon, 15 Jul 1996 15:25:31 -0700 (PDT) Original-Received: from gcm.com (gcm.com [146.121.48.2]) by ifi.uio.no with ESMTP (8.6.11/ifi2.4) id for ; Mon, 15 Jul 1996 23:58:13 +0200 Original-Received: (from uucp@localhost) by gcm.com (8.6.9/8.6.9) with UUCP id SAA00360 for ding@ifi.uio.no; Mon, 15 Jul 1996 18:02:04 -0400 Original-Received: from mis_bo9.it.gcm.com by gcm.com (4.1/GCM-2.0m) id AA27550; Mon, 15 Jul 96 17:56:59 EDT Original-Received: by mis_bo9.it.gcm.com (4.1/SMI-4.1) id AA14988; Mon, 15 Jul 96 17:56:58 EDT Original-To: (ding) GNUS Mailing List Original-Lines: 58 X-Mailer: Gnus v5.2.19/XEmacs 19.13 Xref: main.gmane.org gmane.emacs.gnus.general:7212 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:7212 I want my incoming mail broken into groups, but I want several of those groups to appear in my xfaces display, which means that I have to set procmail to dump them all in the same spool file and have gnus split them. But I don't want gnus to split any of the other groups. So I've made nnmail-resplit-incoming take a list or function. I know that I can just leave them in the nnmail-spool-file, but that only gets read when I call gnus-group-get-new-news with no arguments. If I hit M-2 g, to just get my mail groups, the nnmail-spool-file isn't read. The patch is for 5.2.19. (I can't get 5.2.34 to work with XEmacs 19.13, and I can't get SQL-MODE to work without 19.13. And I can't work without SQL-MODE. :-) ) *** nnmail.el Mon Jul 15 17:45:53 1996 --- nnmail.el~ Sat Jun 15 05:06:30 1996 *************** *** 712,728 **** "Go through the entire INCOMING file and pick out each individual mail. FUNC will be called with the buffer narrowed to each mail." (let (;; If this is a group-specific split, we bind the split ;; methods to just this group. (nnmail-split-methods (if (and group ! (or (eq nnmail-spool-file 'procmail) ! nnmail-use-procmail) ! (or (not nnmail-resplit-incoming) ! (and (functionp nnmail-resplit-incoming) ! (eval (list nnmail-resplit-incoming group))) ! (and (listp nnmail-resplit-incoming) ! (not (member group nnmail-resplit-incoming))))) (list (list group "")) nnmail-split-methods))) (save-excursion ;; Insert the incoming file. (set-buffer (get-buffer-create " *nnmail incoming*")) --- 712,724 ---- "Go through the entire INCOMING file and pick out each individual mail. FUNC will be called with the buffer narrowed to each mail." (let (;; If this is a group-specific split, we bind the split ;; methods to just this group. (nnmail-split-methods (if (and group ! (or (eq nnmail-spool-file 'procmail) ! nnmail-use-procmail) ! (not nnmail-resplit-incoming)) (list (list group "")) nnmail-split-methods))) (save-excursion ;; Insert the incoming file. (set-buffer (get-buffer-create " *nnmail incoming*")) -- David C. Worenklein GREENWICH CAPITAL Operations Support M a r k e t s, Inc ============================================================================= phone: 203-625-2945 ==== fax: 203-629-2535 ==== e-mail: dcw@gcm.com ====