allow for 'hidereadmsgs'

diff --git a/tools/newscache_clean.pl b/tools/newscache_clean.pl
index 7ce3921f164024d7b57b1d20828e2e6de1715136..11ed9ff843e93804ef8c598c4e94cbb362ee590d 100644 (file)
--- 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;
        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}++;
                         $folderlist =~ s/ +//;
                         chomp $folderlist;
                         $saw{$folderlist}++;