From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/18429
Path: main.gmane.org!not-for-mail
From: Mike McEwan <mike@lotusland.demon.co.uk>
Newsgroups: gmane.emacs.gnus.general
Subject: [patch] gnus-agent-save-group-info
Date: 07 Nov 1998 21:31:20 +0000
Sender: owner-ding@hpc.uh.edu
Message-ID: <m3yapnw5p3.fsf@lotusland.demon.co.uk>
NNTP-Posting-Host: coloc-standby.netfonds.no
X-Trace: main.gmane.org 1035156955 6125 80.91.224.250 (20 Oct 2002 23:35:55 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Sun, 20 Oct 2002 23:35:55 +0000 (UTC)
Return-Path: <owner-ding@hpc.uh.edu>
Original-Received: from karazm.math.uh.edu (karazm.math.uh.edu [129.7.128.1])
	by sclp3.sclp.com (8.8.5/8.8.5) with ESMTP id QAA14632
	for <jason@mailhost.sclp.com>; Sat, 7 Nov 1998 16:36:12 -0500 (EST)
Original-Received: from sina.hpc.uh.edu (lists@Sina.HPC.UH.EDU [129.7.3.5])
	by karazm.math.uh.edu (8.9.1/8.9.1) with ESMTP id PAB06164;
	Sat, 7 Nov 1998 15:34:02 -0600 (CST)
Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Sat, 07 Nov 1998 15:33:51 -0600 (CST)
Original-Received: from sclp3.sclp.com (root@sclp3.sclp.com [209.195.19.139]) by sina.hpc.uh.edu (8.7.3/8.7.3) with ESMTP id PAA27737 for <ding@hpc.uh.edu>; Sat, 7 Nov 1998 15:33:43 -0600 (CST)
Original-Received: from post.mail.demon.net (post-11.mail.demon.net [194.217.242.40])
	by sclp3.sclp.com (8.8.5/8.8.5) with ESMTP id QAA14584
	for <ding@gnus.org>; Sat, 7 Nov 1998 16:33:34 -0500 (EST)
Original-Received: from [158.152.62.156] (helo=lotusland.demon.co.uk)
	by post.mail.demon.net with esmtp (Exim 2.05demon1 #1)
	id 0zcFym-0004k8-00
	for ding@gnus.org; Sat, 7 Nov 1998 21:33:08 +0000
Original-Received: from mike by lotusland.demon.co.uk with local (Exim 2.05 #1)
	id 0zcFyA-00017y-00
	for ding@gnus.org; Sat, 7 Nov 1998 21:32:30 +0000
Original-To: ding@gnus.org
User-Agent: Gnus/5.07004 (Pterodactyl Gnus v0.40) XEmacs/21.0 (Finnish Landrace)
Original-Lines: 32
Precedence: list
X-Majordomo: 1.94.jlt7
Xref: main.gmane.org gmane.emacs.gnus.general:18429
X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:18429

  When conducting an `M-g' on an individual group,
`gnus-agent-save-group-info' does not locate a group's info line to
update in a `groups' file, when there is nothing after the group's name 
on the info line returned by the server.

  The following does it for me:

--- ChangeLog~	Mon Oct 26 00:33:21 1998
+++ ChangeLog	Sat Nov  7 21:05:40 1998
@@ -1,3 +1,8 @@
+1998-11-07  Mike McEwan  <mike@lotusland.demon.co.uk>
+
+	* gnus-agent.el (gnus-agent-save-group-info): Cater for group info 
+	lines where `group' is the last thing on the line.
+
 Sun Oct 25 23:11:44 1998  Lars Magne Ingebrigtsen  <larsi@menja.ifi.uio.no>
 
 	* gnus.el: Pterodactyl Gnus v0.40 is released.
--- gnus-agent.el.orig	Mon Oct 26 00:34:53 1998
+++ gnus-agent.el	Sat Nov  7 20:18:23 1998
@@ -564,7 +564,7 @@
 		(gnus-delete-line))
 	      (insert group " " (number-to-string (cdr active)) " "
 		      (number-to-string (car active)) " y\n"))
-	  (when (re-search-forward (concat (regexp-quote group) " ") nil t)
+	  (when (re-search-forward (concat (regexp-quote group) "\\($\\| \\)") nil t)
 	    (gnus-delete-line))
 	  (insert-buffer-substring nntp-server-buffer))))))
 

-- 
Mike.