* [patch] gnus-agent-save-group-info
@ 1998-11-07 21:31 Mike McEwan
0 siblings, 0 replies; only message in thread
From: Mike McEwan @ 1998-11-07 21:31 UTC (permalink / raw)
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.
^ permalink raw reply [flat|nested] only message in thread
only message in thread, other threads:[~1998-11-07 21:31 UTC | newest]
Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
1998-11-07 21:31 [patch] gnus-agent-save-group-info Mike McEwan
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).