|
Lines 565-570
my $humanbranch = ( $branch ne '*' ? $branch : undef );
Link Here
|
| 565 |
my $all_rules = Koha::CirculationRules->search({ branchcode => $humanbranch }); |
565 |
my $all_rules = Koha::CirculationRules->search({ branchcode => $humanbranch }); |
| 566 |
my $definedbranch = $all_rules->count ? 1 : 0; |
566 |
my $definedbranch = $all_rules->count ? 1 : 0; |
| 567 |
|
567 |
|
|
|
568 |
my $rules = {}; |
| 568 |
while ( my $r = $all_rules->next ) { |
569 |
while ( my $r = $all_rules->next ) { |
| 569 |
$r = $r->unblessed; |
570 |
$r = $r->unblessed; |
| 570 |
$rules->{ $r->{categorycode} }->{ $r->{itemtype} }->{ $r->{rule_name} } = $r->{rule_value}; |
571 |
$rules->{ $r->{categorycode} }->{ $r->{itemtype} }->{ $r->{rule_name} } = $r->{rule_value}; |
| 571 |
- |
|
|