From: Mike Taylor Date: Thu, 26 Apr 2007 13:57:17 +0000 (+0000) Subject: Help link for Reliability. X-Git-Tag: CPAN-v1.02~54^2~410 X-Git-Url: http://sru.miketaylor.org.uk/?a=commitdiff_plain;h=5ffcdb88057319217d93ee6a3a5d8dfa4187c6f3;p=irspy-moved-to-github.git Help link for Reliability. --- diff --git a/web/htdocs/details/found.mc b/web/htdocs/details/found.mc index d4b6d66..040318e 100644 --- a/web/htdocs/details/found.mc +++ b/web/htdocs/details/found.mc @@ -1,4 +1,4 @@ -%# $Id: found.mc,v 1.27 2007-02-22 11:49:46 mike Exp $ +%# $Id: found.mc,v 1.28 2007-04-26 13:57:17 mike Exp $ <%once> sub print_navlink { my($params, $cond, $caption, $skip) = @_; @@ -115,7 +115,8 @@ print_navlink(\%params, $last < $n, "Next", $skip+$count); # Title - Reliability + Reliability <& /help/link.mc, help => "info/reliability" &> + Host Port DB diff --git a/web/htdocs/details/full.mc b/web/htdocs/details/full.mc index a5f4110..19f74a2 100644 --- a/web/htdocs/details/full.mc +++ b/web/htdocs/details/full.mc @@ -1,4 +1,4 @@ -%# $Id: full.mc,v 1.25 2007-04-18 12:06:25 mike Exp $ +%# $Id: full.mc,v 1.26 2007-04-26 14:00:33 mike Exp $ <%args> $id @@ -43,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" ], @@ -68,7 +68,11 @@ if ($n == 0) { if ($data) { - <% xml_encode($caption) %> +% $caption =~ s/\/(.*)//; +% my $help = $1; + <% xml_encode($caption) %><% + !defined $help ? "" : $m->comp("/help/link.mc", help =>"info/$help") + %> <% xml_encode($data) %> % }