my $list="<ul>\n";
foreach my $change (rcs_recentchanges(100)) {
$list.="<li>";
- $list.=join(", ", map { htmllink("index", $_, 1) } @{$change->{pages}});
+ $list.=join(", ", map { htmllink("", $_, 1) } @{$change->{pages}});
$list.="<br>\n";
$list.="changed ".$change->{when}." by ".
- htmllink("index", $change->{user}, 1).
+ htmllink("", $change->{user}, 1).
": <i>".$change->{message}."</i>\n";
$list.="</li>\n";
}
print $q->header,
$q->start_html("Creating $page"),
$q->start_h1("<a href=\"$url\">$wikiname</a>/ Creating $page"),
+ $q->end_hi,
$q->start_form(-action => $action),
$q->hidden('do'),
"Select page location:",
print $q->header,
$q->start_html("Editing $page"),
$q->h1("<a href=\"$url\">$wikiname</a>/ Editing $page"),
+ $q->end_hi,
$q->start_form(-action => $action),
$q->hidden('do'),
$q->hidden('page'),