X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=web%2Fhtdocs%2Fdetails%2Ffull.mc;h=a316624c8da20b0368bc69da163d7c2288851c98;hb=ec138f334f853def75f66fef8337adf2a6cc38b2;hp=2ce16c35522db7e708ad037dc50e3adf6e43bfdb;hpb=a54f6e8f9d1fe1d12beb7e2a0ad30d06047bcc10;p=irspy-moved-to-github.git diff --git a/web/htdocs/details/full.mc b/web/htdocs/details/full.mc index 2ce16c3..a316624 100644 --- a/web/htdocs/details/full.mc +++ b/web/htdocs/details/full.mc @@ -1,10 +1,7 @@ -%# $Id: full.mc,v 1.14 2006-11-14 16:24:39 mike Exp $ +%# $Id: full.mc,v 1.18 2006-12-05 17:37:26 mike Exp $ <%args> $id -<%once> -use ZOOM; - <%perl> my $conn = new ZOOM::Connection("localhost:3313/IR-Explain---1"); $conn->option(elementSetName => "zeerex"); @@ -17,24 +14,26 @@ if ($n == 0) { $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 = ( + [ Name => "e:databaseInfo/e:title", + lang => "en", primary => "true" ], + [ Country => "i:status/i:country" ], [ "Last Checked" => "i:status/i:probe[last()]" ], [ Protocol => "e:serverInfo/\@protocol" ], [ Host => "e:serverInfo/e:host" ], [ Port => "e:serverInfo/e:port" ], [ "Database Name" => "e:serverInfo/e:database" ], + [ "Type of Library" => "i:status/i:libraryType" ], [ "Username (if needed)" => "e:serverInfo/e:authentication/e:user" ], [ "Password (if needed)" => "e:serverInfo/e:authentication/e:password" ], - [ Title => "e:databaseInfo/e:title", - lang => "en", primary => "true" ], [ Description => "e:databaseInfo/e:description", lang => "en", primary => "true" ], [ Author => "e:databaseInfo/e:author" ], [ Contact => "e:databaseInfo/e:contact" ], + [ "URL to Hosting Organisation" => "i:status/i:hostURL" ], [ Extent => "e:databaseInfo/e:extent" ], [ History => "e:databaseInfo/e:history" ], [ "Language of Records" => "e:databaseInfo/e:langUsage" ],