urosm
/
ikiwiki
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

recentchanges

master
joey 2006-03-11 03:47:32 +00:00
parent a771728da0
commit 482c133d18
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
ikiwiki
View File

@ -402,7 +402,7 @@ sub rcs_recentchanges ($) {
push @ret, {rev => $rev, user => $user,
date => $when, message => $message,
pages => [@pages]},
last if @ret >= $num;
return @ret if @ret >= $num;
$state='header';
$message=$rev=$user=$when=undef;
@ -640,6 +640,7 @@ sub cgi () {
if ($do eq 'recentchanges') {
my $list="<ul>\n";
foreach my $change (rcs_recentchanges(100)) {
print STDERR "change: $change....\n";
$list.="<li>";
foreach my $page (@{$change->{pages}}) {
$list.=$page." ";