|
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 = map { $_->unblessed } Koha::Libraries->pickup_locations($search_params); |
93 |
my $libraries = Koha::Libraries->pickup_locations($search_params)->unblessed; |
| 94 |
|
94 |
|
| 95 |
for my $l (@libraries) { |
95 |
for my $l (@$libraries) { |
| 96 |
if ( defined $selected and $l->{branchcode} eq $selected |
96 |
if ( defined $selected and $l->{branchcode} eq $selected |
| 97 |
or not defined $selected |
97 |
or not defined $selected |
| 98 |
and C4::Context->userenv |
98 |
and C4::Context->userenv |
|
Lines 102-108
sub pickup_locations {
Link Here
|
| 102 |
} |
102 |
} |
| 103 |
} |
103 |
} |
| 104 |
|
104 |
|
| 105 |
return \@libraries; |
105 |
return $libraries; |
| 106 |
} |
106 |
} |
| 107 |
|
107 |
|
| 108 |
1; |
108 |
1; |
| 109 |
- |
|
|