|
Lines 117-124
foreach (keys %$suggestion_ref){
Link Here
|
| 117 |
} |
117 |
} |
| 118 |
delete $suggestion_only->{branchcode} if $suggestion_only->{branchcode} eq '__ANY__'; |
118 |
delete $suggestion_only->{branchcode} if $suggestion_only->{branchcode} eq '__ANY__'; |
| 119 |
delete $suggestion_only->{budgetid} if $suggestion_only->{budgetid} eq '__ANY__'; |
119 |
delete $suggestion_only->{budgetid} if $suggestion_only->{budgetid} eq '__ANY__'; |
| 120 |
while ( my ( $k, $v ) = each %$suggestion_only ) { |
120 |
|
| 121 |
delete $suggestion_only->{$k} if $v eq ''; |
121 |
unless ( $op eq 'cud-save' ) { |
|
|
122 |
while ( my ( $k, $v ) = each %$suggestion_only ) { |
| 123 |
delete $suggestion_only->{$k} if $v eq ''; |
| 124 |
} |
| 122 |
} |
125 |
} |
| 123 |
|
126 |
|
| 124 |
my ( $template, $borrowernumber, $cookie, $userflags ) = get_template_and_user( |
127 |
my ( $template, $borrowernumber, $cookie, $userflags ) = get_template_and_user( |
| 125 |
- |
|
|