Lines 25947-25954
if ( CheckVersion($DBversion) ) {
Link Here
|
25947 |
|, { Slice => {} } |
25947 |
|, { Slice => {} } |
25948 |
); |
25948 |
); |
25949 |
for my $suggestion (@$suggestions) { |
25949 |
for my $suggestion (@$suggestions) { |
25950 |
my ($max_date) = sort ( $suggestion->{manageddate} || (), $suggestion->{accepteddate} || (), |
25950 |
my ($max_date) = sort { $a cmp $b } ( |
25951 |
$suggestion->{rejecteddate} || () ); |
25951 |
$suggestion->{manageddate} || (), $suggestion->{accepteddate} || (), |
|
|
25952 |
$suggestion->{rejecteddate} || () |
25953 |
); |
25952 |
next unless $max_date; |
25954 |
next unless $max_date; |
25953 |
my $last_modif_by = |
25955 |
my $last_modif_by = |
25954 |
( defined $suggestion->{manageddate} and $max_date eq $suggestion->{manageddate} ) |
25956 |
( defined $suggestion->{manageddate} and $max_date eq $suggestion->{manageddate} ) |
25955 |
- |
|
|