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

(-)a/C4/Budgets.pm (-1 / +1 lines)
Lines 1161-1166 sub CloneBudgetHierarchy { Link Here
1161
        my $tidy_budget =
1161
        my $tidy_budget =
1162
          { map { join( ' ', @columns ) =~ /$_/ ? ( $_ => $budget->{$_} ) : () }
1162
          { map { join( ' ', @columns ) =~ /$_/ ? ( $_ => $budget->{$_} ) : () }
1163
              keys %$budget };
1163
              keys %$budget };
1164
	delete $tidy_budget->{timestamp};
1164
        my $new_budget_id = AddBudget(
1165
        my $new_budget_id = AddBudget(
1165
            {
1166
            {
1166
                %$tidy_budget,
1167
                %$tidy_budget,
1167
- 

Return to bug 15408