X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=web%2Fhtdocs%2Fdetails%2Ffull.mc;h=5f7ac19157d2e14e929f40b04a1d44a5c64ea3e5;hb=5af2144c9a1726a64ee62805bea33a8094109ceb;hp=7e75f4dd0a89d75f1bca09976fd27cbb78904a5a;hpb=1b29429069328d4c2046b471206e865eed0b72c3;p=irspy-moved-to-github.git diff --git a/web/htdocs/details/full.mc b/web/htdocs/details/full.mc index 7e75f4d..5f7ac19 100644 --- a/web/htdocs/details/full.mc +++ b/web/htdocs/details/full.mc @@ -1,4 +1,4 @@ -%# $Id: full.mc,v 1.1 2006-10-20 16:57:40 mike Exp $ +%# $Id: full.mc,v 1.13 2006-11-06 17:43:29 mike Exp $ <%args> $id %args> @@ -20,6 +20,7 @@ if ($n == 0) { my $rec = $rs->record(0); my $xc = irspy_xpath_context($rec); my @fields = ( + [ "Last Checked" => "i:status/i:probe[last()]" ], [ Protocol => "e:serverInfo/\@protocol" ], [ Host => "e:serverInfo/e:host" ], [ Port => "e:serverInfo/e:port" ], @@ -39,15 +40,35 @@ if ($n == 0) { [ "Language of Records" => "e:databaseInfo/e:langUsage" ], [ Restrictions => "e:databaseInfo/e:restrictions" ], [ Subjects => "e:databaseInfo/e:subjects" ], - ### Remember to set e:metaInfo/e:dateModified + [ "Implementation ID" => "i:status/i:implementationId" ], + [ "Implementation Name" => "i:status/i:implementationName" ], + [ "Implementation Version" => "i:status/i:implementationVersion" ], + [ "Reliability" => \&calc_reliability, $xc ], + [ "Services" => sub { " +### IRSpy does not yet check for search, present, delSet, +concurrentOperations, namedResultSets, etc. and store the information +is a usable form. This information should probably be harvested from +the Init Response. +" } ], + [ "Bib-1 Use attributes" => \&calc_ap, $xc, "bib-1" ], + [ "Dan-1 Use attributes" => \&calc_ap, $xc, "dan-1" ], + [ "Operators" => \&calc_boolean, $xc ], + [ "Named Result Sets" => \&calc_nrs, $xc ], + [ "Record syntaxes" => \&calc_recsyn, $xc ], + [ "Explain" => \&calc_explain, $xc ], ); %perl> -