From: Paul Mangan <paul@claws-mail.org>
Date: Tue, 11 Dec 2001 15:07:15 +0000 (+0000)
Subject: allow for 'hidereadmsgs'
X-Git-Tag: rel_0_6_6~42
X-Git-Url: http://git.claws-mail.org/?p=claws.git;a=commitdiff_plain;h=9239742c3e12efdb32374c14333ffc90e1bcb96d;ds=sidebyside

allow for 'hidereadmsgs'
---

diff --git a/tools/newscache_clean.pl b/tools/newscache_clean.pl
index 7ce3921f1..11ed9ff84 100644
--- a/tools/newscache_clean.pl
+++ b/tools/newscache_clean.pl
@@ -75,7 +75,9 @@ foreach $folderlist (@folderlist) { ## remove old newsgroups directory trees
 	if ($wegotnews && $folderlist !~ m/<\/folder>\n/) {
                 if ($folderlist =~ m/<folderitem type="normal"/) {
                 	$folderlist =~ s/<folderitem type="normal" name="[A-Z0-9.]+" path="//i;
-               		$folderlist =~ s/" threaded="[0-1]+" mtime="[0-9]+" new="[0-9]+" unread="[0-9]+" total="[0-9]+" \/>//;
+               		$folderlist =~ s/" threaded="[0-1]+//;
+			$folderlist =~ s/" hidereadmsgs="[0-1]+//;
+			$folderlist =~ s/" mtime="[0-9]+" new="[0-9]+" unread="[0-9]+" total="[0-9]+" \/>//;
                         $folderlist =~ s/ +//;
                         chomp $folderlist;
                         $saw{$folderlist}++;