Lines 1923-1929
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'}; |
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 |
- |
|
|