Lines 90-98
sub pickup_locations {
Link Here
|
90 |
|
90 |
|
91 |
my $search_params = $params->{search_params} || {}; |
91 |
my $search_params = $params->{search_params} || {}; |
92 |
my $selected = $params->{selected}; |
92 |
my $selected = $params->{selected}; |
93 |
my $libraries = Koha::Libraries->pickup_locations($search_params)->unblessed; |
93 |
my $libraries = Koha::Libraries->pickup_locations($search_params); |
94 |
|
94 |
|
95 |
for my $l (@$libraries) { |
95 |
for my $l (@$libraries) { |
|
|
96 |
$l = $l->unblessed; |
96 |
if ( defined $selected and $l->{branchcode} eq $selected |
97 |
if ( defined $selected and $l->{branchcode} eq $selected |
97 |
or not defined $selected |
98 |
or not defined $selected |
98 |
and C4::Context->userenv |
99 |
and C4::Context->userenv |
99 |
- |
|
|