-%# $Id: full.mc,v 1.15 2006-11-15 13:23:05 mike Exp $
+%# $Id: full.mc,v 1.17 2006-11-16 17:12:30 mike Exp $
<%args>
$id
</%args>
-<%once>
-use ZOOM;
-</%once>
<%perl>
my $conn = new ZOOM::Connection("localhost:3313/IR-Explain---1");
$conn->option(elementSetName => "zeerex");
$m->comp("/details/error.mc",
title => "Error", message => "No such ID '$id'");
} else {
- my $rec = $rs->record(0);
- my $xc = irspy_xpath_context($rec);
+ my $xc = irspy_xpath_context($rs->record(0));
my @fields = (
[ "Last Checked" => "i:status/i:probe[last()]" ],
[ Protocol => "e:serverInfo/\@protocol" ],