From: Bill Erickson Date: Mon, 20 Jan 2014 20:42:38 +0000 (-0500) Subject: LP#1053397 MR detail page additions X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=3bae24efbce8663df574aeea43b96b67a8f41fb1;p=working%2FEvergreen.git LP#1053397 MR detail page additions Signed-off-by: Bill Erickson --- diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Record.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Record.pm index 2a68c0e92a..0b00694adf 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Record.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Record.pm @@ -585,7 +585,7 @@ sub load_metarecord { my $self = shift; my %kwargs = @_; my $ctx = $self->ctx; - $ctx->{page} = 'metrecord'; + $ctx->{page} = 'metarecord'; my $e = OpenILS::Utils::CStoreEditor->new; $self->timelog("load_metarecord() began"); @@ -594,6 +594,8 @@ sub load_metarecord { return Apache2::Const::HTTP_BAD_REQUEST unless $mmr_id and $mmr_id =~ /^\d+$/; + $ctx->{metarecord_id} = $mmr_id; + my $mmr = $e->retrieve_metabib_metarecord($mmr_id) or return Apache2::Const::HTTP_BAD_REQUEST; # bad ID diff --git a/Open-ILS/src/templates/opac/parts/record/summary.tt2 b/Open-ILS/src/templates/opac/parts/record/summary.tt2 index c6e3b7c3ae..d00d086f05 100644 --- a/Open-ILS/src/templates/opac/parts/record/summary.tt2 +++ b/Open-ILS/src/templates/opac/parts/record/summary.tt2 @@ -148,6 +148,17 @@ IF num_uris > 0; [%- END %] +[%- IF ctx.page == 'metarecord' %] +[%# link to list of metarecord constituent records %] +
+
+ + [% l('View All Formats and Editions') %] + +
+[%- END %] +

[% l("Record details") %]