From: joey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071>
Date: Sat, 11 Mar 2006 03:47:32 +0000 (+0000)
Subject: recentchanges
X-Git-Tag: 1.0~529
X-Git-Url: http://git.tremily.us/?p=ikiwiki.git;a=commitdiff_plain;h=482c133d1818589919b894cfdd2ff82d4e9f5ddd

recentchanges
---

diff --git a/ikiwiki b/ikiwiki
index debf43a54..643f0a054 100755
--- a/ikiwiki
+++ b/ikiwiki
@@ -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." ";