merging new_acq fix: budget_parent dropbox was wrong

(Probably need to patch SAN-OP branch as well)

diff --git a/admin/aqbudgets.pl b/admin/aqbudgets.pl
index 74a4178..67a3151 100755 (executable)
--- a/admin/aqbudgets.pl
+++ b/admin/aqbudgets.pl
@@ -200,9 +200,9 @@ if ($op eq 'add_form') {
     }
     push @values, '';
     # if no buget_id is passed then its an add
-    my $budget_dropbox;
+    my $budget_parent_dropbox;
     my $budget_parent_id = $budget->{'budget_parent_id'} if $budget;
-    $budget_dropbox = CGI::scrolling_list(
+    $budget_parent_dropbox = CGI::scrolling_list(
         -name    => 'budget_parent_id',
         -values  => \@values,
         -default => $budget_parent_id ? $budget_parent_id : undef,
@@ -210,7 +210,6 @@ if ($op eq 'add_form') {
         -style   => "min-width:100px;",
         -labels  => \%labels,
     );
-    my $budget_parent_dropbox =~ s/\~/ /g;  #
 
     my $branches = GetBranches;
     my @branchloop_select;