projects
/
ikiwiki.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
f7d49b9
)
recentchanges
author
joey
<joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071>
Sat, 11 Mar 2006 03:56:32 +0000
(
03:56
+0000)
committer
joey
<joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071>
Sat, 11 Mar 2006 03:56:32 +0000
(
03:56
+0000)
ikiwiki
patch
|
blob
|
history
diff --git
a/ikiwiki
b/ikiwiki
index 813c38b52d6261b9fbd21d37736592b388cedb3f..85384dde5f79b81bb41c7a07854b350ba674f0f6 100755
(executable)
--- a/
ikiwiki
+++ b/
ikiwiki
@@
-383,7
+383,6
@@
sub rcs_recentchanges ($) {
my ($rev, $user, $when, @pages, $message);
foreach (`LANG=C svn log -v '$svn_url'`) {
chomp;
my ($rev, $user, $when, @pages, $message);
foreach (`LANG=C svn log -v '$svn_url'`) {
chomp;
- print STDERR "state: $state ($_)\n";
if ($state eq 'start' && /$div/) {
$state='header';
}
if ($state eq 'start' && /$div/) {
$state='header';
}
@@
-402,7
+401,6
@@
sub rcs_recentchanges ($) {
push @ret, { rev => $rev, user => $user,
date => $when, message => $message,
pages => [@pages] };
push @ret, { rev => $rev, user => $user,
date => $when, message => $message,
pages => [@pages] };
- print STDERR "have: $#ret; most recent is $ret[$#ret]\n";
return @ret if @ret >= $num;
$state='header';
return @ret if @ret >= $num;
$state='header';
@@
-641,7
+639,6
@@
sub cgi () {
if ($do eq 'recentchanges') {
my $list="<ul>\n";
foreach my $change (rcs_recentchanges(100)) {
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." ";
$list.="<li>";
foreach my $page (@{$change->{pages}}) {
$list.=$page." ";
@@
-649,7
+646,7
@@
sub cgi () {
$list.="<br>\n";
$list.="changed ".$change->{when}." by ".
htmllink("index", $change->{user}).
$list.="<br>\n";
$list.="changed ".$change->{when}." by ".
htmllink("index", $change->{user}).
- ": <i>".$change->{message}."<br>\n";
+ ": <i>".$change->{message}."<
/i><
br>\n";
$list.="</li>\n";
}
$list.="</ul>\n";
$list.="</li>\n";
}
$list.="</ul>\n";