|
Lines 1923-1930
sub _GetCircControlBranch {
Link Here
|
| 1923 |
my $circcontrol = C4::Context->preference('CircControl'); |
1923 |
my $circcontrol = C4::Context->preference('CircControl'); |
| 1924 |
my $branch; |
1924 |
my $branch; |
| 1925 |
|
1925 |
|
| 1926 |
if ($circcontrol eq 'PickupLibrary') { |
1926 |
if ($circcontrol eq 'PickupLibrary' and (C4::Context->userenv and C4::Context->userenv->{'branch'}) ) { |
| 1927 |
$branch= C4::Context->userenv->{'branch'} if C4::Context->userenv; |
1927 |
$branch= C4::Context->userenv->{'branch'}; |
| 1928 |
} elsif ($circcontrol eq 'PatronLibrary') { |
1928 |
} elsif ($circcontrol eq 'PatronLibrary') { |
| 1929 |
$branch=$borrower->{branchcode}; |
1929 |
$branch=$borrower->{branchcode}; |
| 1930 |
} else { |
1930 |
} else { |
| 1931 |
- |
|
|