From 2104844ba81ab755428538bf5006a86e8434a606 Mon Sep 17 00:00:00 2001 From: Mike Taylor Date: Wed, 19 Dec 2012 10:00:18 +0000 Subject: [PATCH] Add Piggyback searching line to full-record display. --- web/htdocs/details/full.mc | 2 ++ 1 file changed, 2 insertions(+) diff --git a/web/htdocs/details/full.mc b/web/htdocs/details/full.mc index 546419b..6003fc7 100644 --- a/web/htdocs/details/full.mc +++ b/web/htdocs/details/full.mc @@ -51,6 +51,7 @@ if ($n == 0) { [ "Record syntaxes" => \&calc_recsyn, $xc ], [ "Explain" => \&calc_explain, $xc ], [ "Multiple OPAC records" => \&calc_mor, $xc ], + [ "Piggback searching" => \&calc_piggyback, $xc ], ); my $title = $xc->find("e:databaseInfo/e:title"); @@ -183,6 +184,7 @@ sub calc_boolean { sub calc_nrs { _calc_boolean(@_, 'i:status/i:named_resultset[@ok = "1"]') } sub calc_mor { _calc_boolean(@_, 'i:status/i:multiple_opac[@ok = "1"]') } +sub calc_piggyback { _calc_boolean(@_, 'i:status/i:piggback[@ok = "1"]') } sub _calc_boolean { my($id, $xc, $xpath) = @_; -- 1.7.10.4