From ef5fb9f2ecc3a9c6b9b595f79a6c9fe246c3589d Mon Sep 17 00:00:00 2001 From: Jeff Davis Date: Mon, 3 Oct 2016 13:39:37 -0700 Subject: [PATCH] LP#1541559: make active barcode available in OPAC When logged in to the TPAC, the barcode of the patron's active card is made available in $ctx->{active_card}. Signed-off-by: Jeff Davis Signed-off-by: Kathy Lussier --- Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader.pm index 3b1a661e65..f2f5d8f726 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader.pm @@ -302,6 +302,7 @@ sub load_common { $ctx->{authtoken} = $e->authtoken; $ctx->{authtime} = $e->authtime; $ctx->{user} = $e->requestor; + $ctx->{active_card} = $self->editor->retrieve_actor_card($ctx->{user}->card)->barcode; $ctx->{place_unfillable} = 1 if $e->requestor->wsid && $e->allowed('PLACE_UNFILLABLE_HOLD', $e->requestor->ws_ou); # The browser client does not set an OILS-Wrapper header (above). -- 2.43.2