return "<a href=\"$user\">$oiduser</a>";
}
else {
+ eval q{use CGI 'escapeHTML'};
+ error($@) if $@;
+
return htmllink("", "", escapeHTML(
length $config{userdir} ? $config{userdir}."/".$user : $user
), noimageinline => 1);
}
}
+ if (! length $code) {
+ $code=0;
+ }
+
return eval 'sub { my $page=shift; '.$code.' }';
} #}}}