elsif ($state eq 'body' && /$div/) {
push @ret, { rev => $rev, user => $user,
date => $when, message => $message,
- pages => [@pages] },
- print STDERR "have: $#ret\n";
+ pages => [@pages] };
+ print STDERR "have: $#ret; most recent is $ret[$#ret]\n";
return @ret if @ret >= $num;
$state='header';