diff options
author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2020-06-25 15:54:46 +0200 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2020-06-25 16:07:00 +0200 |
commit | a345b652dd852b94b36f0fe807bda7906db9cdfd (patch) | |
tree | 38ec7f1757970a98c5906a243b284edc0aef722d /URPM | |
parent | 4d152a6a01df17201efa457a1477a1ea0866899d (diff) | |
download | perl-URPM-a345b652dd852b94b36f0fe807bda7906db9cdfd.tar perl-URPM-a345b652dd852b94b36f0fe807bda7906db9cdfd.tar.gz perl-URPM-a345b652dd852b94b36f0fe807bda7906db9cdfd.tar.bz2 perl-URPM-a345b652dd852b94b36f0fe807bda7906db9cdfd.tar.xz perl-URPM-a345b652dd852b94b36f0fe807bda7906db9cdfd.zip |
Make it work with no feature qw(indirect) (aka perl7)
Diffstat (limited to 'URPM')
-rw-r--r-- | URPM/Build.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/URPM/Build.pm b/URPM/Build.pm index 3ac41a8..6c6350c 100644 --- a/URPM/Build.pm +++ b/URPM/Build.pm @@ -514,7 +514,7 @@ sub make_delta_rpm ($$) { @_ == 2 or return 0; -e $_[0] && -e $_[1] && -x $MAKEDELTARPM or return 0; my @id; - my $urpm = new URPM; + my $urpm = URPM->new; foreach my $i (0, 1) { ($id[$i]) = $urpm->parse_rpm($_[$i]); defined $id[$i] or return 0; |