diff options
author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2020-04-29 05:55:26 +0200 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2020-04-29 05:55:26 +0200 |
commit | 54a0ee60730839c3e461b3e81b188f22a41321cc (patch) | |
tree | ce364154d862ee5635dffde92d5a1789361f3903 | |
parent | 7ce28b949d10e78a4c1f2d419b9b313958da7df4 (diff) | |
download | perl-URPM-54a0ee60730839c3e461b3e81b188f22a41321cc.tar perl-URPM-54a0ee60730839c3e461b3e81b188f22a41321cc.tar.gz perl-URPM-54a0ee60730839c3e461b3e81b188f22a41321cc.tar.bz2 perl-URPM-54a0ee60730839c3e461b3e81b188f22a41321cc.tar.xz perl-URPM-54a0ee60730839c3e461b3e81b188f22a41321cc.zip |
fix comparing version when using a fixup rpm release
force using a version object
rationale:
- 4.12.0.2 < 4.12.90 will wrongly pass
- v4.12.0.2 < 4.12.90 will check as we expect
-rwxr-xr-x | Makefile.PL | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Makefile.PL b/Makefile.PL index b10f56e..080003d 100755 --- a/Makefile.PL +++ b/Makefile.PL @@ -47,7 +47,8 @@ foreach (qw( 4.14.2 )) { my $v = $_; - $cfg{modversion} < $v and last; + my $vobj = version->declare("v$_"); + $cfg{modversion} < $vobj and last; $v =~ s/\./_/g; print $FH "#define RPM$v\n"; } |