From: Mike Taylor Date: Mon, 12 Apr 2010 15:32:59 +0000 (+0100) Subject: Web UI uses new name calc_reliability_string() rather than old calc_reliability() X-Git-Tag: CPAN-v1.02~54^2~100 X-Git-Url: http://sru.miketaylor.org.uk/?a=commitdiff_plain;h=3ed6954f13f2b2e60374412fef7615e6a2358fd4;p=irspy-moved-to-github.git Web UI uses new name calc_reliability_string() rather than old calc_reliability() --- diff --git a/web/htdocs/chrome/layout.mc b/web/htdocs/chrome/layout.mc index 1471202..b1f054b 100644 --- a/web/htdocs/chrome/layout.mc +++ b/web/htdocs/chrome/layout.mc @@ -12,7 +12,7 @@ use ZOOM::IRSpy::Utils qw(utf8param isodate xml_encode cql_target cql_quote irspy_xpath_context irspy_make_identifier irspy_record2identifier irspy_identifier2target modify_xml_document - bib1_access_point calc_reliability); + bib1_access_point calc_reliability_string); % $r->content_type("text/html; charset=utf-8"); % my $text = $m->scomp($component, %ARGS); diff --git a/web/htdocs/details/found.mc b/web/htdocs/details/found.mc index 8380171..0f44196 100644 --- a/web/htdocs/details/found.mc +++ b/web/htdocs/details/found.mc @@ -115,7 +115,7 @@ print_navlink(\%params, $last < $n, "Next", $skip+$count); <%perl> my $xc = irspy_xpath_context($rs->record($i-1)); my $title = $xc->find("e:databaseInfo/e:title") || "[UNTITLED]"; -my $reliability = calc_reliability($xc); +my $reliability = calc_reliability_string($xc); my $host = $xc->find("e:serverInfo/e:host"); my $port = $xc->find("e:serverInfo/e:port"); my $db = $xc->find("e:serverInfo/e:database"); diff --git a/web/htdocs/details/full.mc b/web/htdocs/details/full.mc index 4157b1f..73836a1 100644 --- a/web/htdocs/details/full.mc +++ b/web/htdocs/details/full.mc @@ -97,7 +97,7 @@ if ($n == 0) { sub calc_reliability_wrapper { my($id, $xc) = @_; - return calc_reliability($xc); + return calc_reliability_string($xc); } sub calc_init_options {