From: Mike Taylor <mike@miketaylor.org.uk>
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://git.indexdata.com/?p=irspy-moved-to-github.git;a=commitdiff_plain;h=3ed6954f13f2b2e60374412fef7615e6a2358fd4

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);
 </%once>
 % $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 {