exit 0;
} #}}}
-sub cgi_recentchanges () { #{{{
+sub cgi_recentchanges ($) { #{{{
my $q=shift;
my $template=HTML::Template->new(
wikiname => $wikiname,
changelog => [rcs_recentchanges(100)],
);
- print $template->output;
+ print $q->header, $template->output;
} #}}}
sub cgi_signin ($$) { #{{{
}
if ($do eq 'recentchanges') {
- cgi_recentchanges();
+ cgi_recentchanges($q);
return;
}