View | Details | Raw Unified | Return to bug 18906
Collapse All | Expand All

(-)a/admin/aqbudgets.pl (-2 / +2 lines)
Lines 237-243 if ( $op eq 'list' ) { Link Here
237
    );
237
    );
238
238
239
    my @budgets = @{
239
    my @budgets = @{
240
        GetBudgetHierarchy( $$period{budget_period_id}, C4::Context->userenv->{branch}, ( $show_mine ? $borrower_id : 0 ))
240
        GetBudgetHierarchy( $$period{budget_period_id}, undef, ( $show_mine ? $borrower_id : 0 ))
241
    };
241
    };
242
242
243
    my $period_total = 0;
243
    my $period_total = 0;
Lines 248-253 if ( $op eq 'list' ) { Link Here
248
    my @budgets_to_display;
248
    my @budgets_to_display;
249
    foreach my $budget (@budgets) {
249
    foreach my $budget (@budgets) {
250
        # PERMISSIONS
250
        # PERMISSIONS
251
        next unless CanUserUseBudget($borrowernumber, $budget, $staffflags);
251
        unless(CanUserModifyBudget($borrowernumber, $budget, $staffflags)) {
252
        unless(CanUserModifyBudget($borrowernumber, $budget, $staffflags)) {
252
            $budget->{'budget_lock'} = 1;
253
            $budget->{'budget_lock'} = 1;
253
        }
254
        }
254
- 

Return to bug 18906