projects
/
elisp
/
gnus.git-
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Sync up with Pterodactyl Gnus v0.93.
[elisp/gnus.git-]
/
lisp
/
gnus-srvr.el
diff --git
a/lisp/gnus-srvr.el
b/lisp/gnus-srvr.el
index
0ae565a
..
7d15a9f
100644
(file)
--- a/
lisp/gnus-srvr.el
+++ b/
lisp/gnus-srvr.el
@@
-592,11
+592,9
@@
The following commands are available:
(goto-char (point-min))
(unless (string= gnus-ignored-newsgroups "")
(delete-matching-lines gnus-ignored-newsgroups))
(goto-char (point-min))
(unless (string= gnus-ignored-newsgroups "")
(delete-matching-lines gnus-ignored-newsgroups))
- (while (re-search-forward
- "\\(^[^ \t]+\\)[ \t]+[0-9]+[ \t]+[0-9]+" nil t)
- (goto-char (match-end 1))
+ (while (and (not (eobp)) (forward-line))
(ignore-errors
(ignore-errors
- (push (cons (match-string 1)
+ (push (cons (read cur)
(max 0 (- (1+ (read cur)) (read cur))))
groups)))))
(setq groups (sort groups
(max 0 (- (1+ (read cur)) (read cur))))
groups)))))
(setq groups (sort groups