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

(-)a/C4/Budgets.pm (-1 / +1 lines)
Lines 1221-1226 sub CloneBudgetHierarchy { Link Here
1221
        my $tidy_budget =
1221
        my $tidy_budget =
1222
          { map { join( ' ', @columns ) =~ /$_/ ? ( $_ => $budget->{$_} ) : () }
1222
          { map { join( ' ', @columns ) =~ /$_/ ? ( $_ => $budget->{$_} ) : () }
1223
              keys %$budget };
1223
              keys %$budget };
1224
	delete $tidy_budget->{timestamp};
1224
        my $new_budget_id = AddBudget(
1225
        my $new_budget_id = AddBudget(
1225
            {
1226
            {
1226
                %$tidy_budget,
1227
                %$tidy_budget,
1227
- 

Return to bug 15408