Lines 143-150
if ( $op =~ /save/i ) {
Link Here
|
143 |
Init($suggestion_ref); |
143 |
Init($suggestion_ref); |
144 |
} |
144 |
} |
145 |
else { |
145 |
else { |
146 |
$suggestion_only->{suggesteddate} = dt_from_string( $suggestion_only->{suggesteddate} ) |
146 |
|
147 |
if $suggestion_only->{suggesteddate}; |
147 |
for my $date_key ( qw( suggesteddate manageddate accepteddate rejecteddate ) ) { |
|
|
148 |
$suggestion_only->{$date_key} = dt_from_string( $suggestion_only->{$date_key} ) |
149 |
if $suggestion_only->{$date_key}; |
150 |
} |
148 |
|
151 |
|
149 |
if ( $suggestion_only->{"STATUS"} ) { |
152 |
if ( $suggestion_only->{"STATUS"} ) { |
150 |
if ( my $tmpstatus = lc( $suggestion_only->{"STATUS"} ) =~ /ACCEPTED|REJECTED/i ) { |
153 |
if ( my $tmpstatus = lc( $suggestion_only->{"STATUS"} ) =~ /ACCEPTED|REJECTED/i ) { |
151 |
- |
|
|