X-Git-Url: https://git.deb.at/?a=blobdiff_plain;f=lib%2FPackages%2FPage.pm;h=3eb31985843d04af7c69ad3f45e87656424ab0ab;hb=01393b020237bbfa4571d41cc98899b4d25acd8b;hp=000f1a0c24bfcaaad9a33236b5f08fb024fd2371;hpb=b21dd56695db580574c998f2f9ca59e18d168c06;p=deb%2Fpackages.git diff --git a/lib/Packages/Page.pm b/lib/Packages/Page.pm index 000f1a0..3eb3198 100644 --- a/lib/Packages/Page.pm +++ b/lib/Packages/Page.pm @@ -128,8 +128,8 @@ sub merge_package { debug( "package $data->{package}/$data->{version}/$data->{architecture} is subsequent merge", 3 ) if DEBUG; my $is_newest; - if ($is_newest = - (version_cmp( $data->{version}, $self->{newest} ) > 0)) { + my $cmp = version_cmp( $data->{version}, $self->{newest} ); + if ($is_newest = ($cmp > 0)) { $self->{newest} = $data->{version}; foreach my $key (@TAKE_NEWEST) { $self->{data}{$key} = $data->{$key};