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

(-)a/C4/Budgets.pm (-2 / +1 lines)
Lines 1109-1115 sub CloneBudgetHierarchy { Link Here
1109
1109
1110
        my $tidy_budget =
1110
        my $tidy_budget =
1111
          { map { join( ' ', @columns ) =~ /$_/ ? ( $_ => $budget->{$_} ) : () }
1111
          { map { join( ' ', @columns ) =~ /$_/ ? ( $_ => $budget->{$_} ) : () }
1112
              keys($budget) };
1112
              keys %$budget };
1113
        my $new_budget_id = AddBudget(
1113
        my $new_budget_id = AddBudget(
1114
            {
1114
            {
1115
                %$tidy_budget,
1115
                %$tidy_budget,
1116
- 

Return to bug 12164