-%# $Id: menu.mc,v 1.14 2006-11-16 17:02:30 mike Exp $
+%# $Id: menu.mc,v 1.16 2006-11-16 17:07:01 mike Exp $
<p>
<a href="/"><b>Home</b></a><br/>
<a href="/all.html">Test all targets</a><br/>
% }
</p>
<%perl>
-our $rec;
my $id = $r->param("id");
{
# Make up ID for newly created records. It would be more
if ((!defined $id || $id eq "") &&
defined $host && defined $port && defined $dbname) {
$id = "$host:$port/$dbname";
-# $r->param(id => $id);
-# $ARGS{id} = $id;
#warn "id set to '$id'";
}
}
</%perl>
-% if (!defined $id) {
-% $rec = undef;
-% } else {
+% if (defined $id) {
<div class="panel2">
<b>This Target</b>
<a href="<% xml_encode("/full.html?id=" . uri_escape($id)) %>">Show details</a>