$template->param(COINLIFETIME => $COINLIFETIME);
$template->param(FLIPPEDCOINSINDB => $flippedcoinsindb);
$template->param(COINSINDB => $coinsindb);
+ $template->param(HTTP_HOST => $ENV{HTTP_HOST});
print "Content-type: text/html\n\n", $template->output;
}
$template = HTML::Template->new(filename => 'created.html');
$template->param(NEWCOINID => $newcoinid);
- $template->param(HTTP_HOST => $ENV{HTTP_HOST});
}
elsif ( length($requestedcoinid) > 0 ) {
if ( ! exists $coins_db{$requestedcoinid} ) {
$template = HTML::Template->new(filename => 'usecoin.html');
$template->param(REQUESTEDCOINID => $requestedcoinid);
- $template->param(HTTP_HOST => $ENV{HTTP_HOST});
$template->param(COINCREATIONTIME => localtime($coininfo[0])."");
if ( $coininfosize == 1 && $requestedaction eq "" ) {
patchme@flipacoin.org</a>.
</font>
<hr>
-<h3><a href=/><font color=black>flipacoin.org</font></a> - The Internet's first coinflipping service.</h3>
+<h3><a href=/><font color=black><!-- TMPL_VAR NAME=HTTP_HOST --></font></a> - The Internet's first coinflipping service.</h3>