Fix reversed version comparison

This commit is contained in:
Jamie Cameron
2011-01-12 15:15:52 -08:00
parent ff37c78708
commit add3efd274

View File

@@ -235,7 +235,7 @@ for(my $i=0; $i<@sp1 || $i<@sp2; $i++) {
# Numeric compared to non-numeric - numeric is always higher
$comp = 1;
}
elsif ($v1 =~ /^\d+$/ && $v2 !~ /^\d+$/) {
elsif ($v1 !~ /^\d+$/ && $v2 =~ /^\d+$/) {
# Non-numeric compared to numeric - numeric is always higher
$comp = -1;
}