X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=blobdiff_plain;f=web%2Fhtdocs%2Fdetails%2Ffull.mc;h=19f74a29c1abf855cd47554a97da6f03859ea836;hp=8cb48632547c8cd3c4f93f1d2067e70a57fadb75;hb=0ce213161741b7726ac32bd6c76bbef7f1dc6ab7;hpb=e8a3ce9f6d7d213621575e8923ed07dfab35885b diff --git a/web/htdocs/details/full.mc b/web/htdocs/details/full.mc index 8cb4863..19f74a2 100644 --- a/web/htdocs/details/full.mc +++ b/web/htdocs/details/full.mc @@ -1,4 +1,4 @@ -%# $Id: full.mc,v 1.21 2007-01-24 09:28:02 mike Exp $ +%# $Id: full.mc,v 1.26 2007-04-26 14:00:33 mike Exp $ <%args> $id %args> @@ -25,10 +25,8 @@ if ($n == 0) { [ 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" ], +# [ "Username (if needed)" => "e:serverInfo/e:authentication/e:user" ], +# [ "Password (if needed)" => "e:serverInfo/e:authentication/e:password" ], [ "Server ID" => 'i:status/i:serverImplementationId/@value' ], [ "Server Name" => 'i:status/i:serverImplementationName/@value' ], [ "Server Version" => 'i:status/i:serverImplementationVersion/@value' ], @@ -45,7 +43,7 @@ if ($n == 0) { [ "Implementation ID" => "i:status/i:implementationId" ], [ "Implementation Name" => "i:status/i:implementationName" ], [ "Implementation Version" => "i:status/i:implementationVersion" ], - [ "Reliability" => \&calc_reliability, $xc ], + [ "Reliability/reliability" => \&calc_reliability, $xc ], [ "Services" => \&calc_init_options, $xc ], [ "Bib-1 Use attributes" => \&calc_ap, $xc, "bib-1" ], [ "Dan-1 Use attributes" => \&calc_ap, $xc, "dan-1" ], @@ -54,8 +52,9 @@ if ($n == 0) { [ "Record syntaxes" => \&calc_recsyn, $xc ], [ "Explain" => \&calc_explain, $xc ], ); + my $title = $xc->find("e:databaseInfo/e:title"); %perl> -
<% xml_encode($caption) %> | +% $caption =~ s/\/(.*)//; +% my $help = $1; +<% xml_encode($caption) %><% + !defined $help ? "" : $m->comp("/help/link.mc", help =>"info/$help") + %> | <% xml_encode($data) %> |
---|