aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--Changes1
-rw-r--r--URPM.pm2
-rw-r--r--URPM/Build.pm2
3 files changed, 3 insertions, 2 deletions
diff --git a/Changes b/Changes
index 0dd3c40..9c192b3 100644
--- a/Changes
+++ b/Changes
@@ -1,4 +1,5 @@
- Build with the flags used to build perl itsefl
+- Make it work with no feature qw(indirect) (aka perl7)
Version 5.122 - 3 June 2020
diff --git a/URPM.pm b/URPM.pm
index 51ba47a..d9f86f3 100644
--- a/URPM.pm
+++ b/URPM.pm
@@ -293,7 +293,7 @@ URPM - Manipulate RPM files and headers
});
# loading and parsing a synthesis file
- my $urpm = new URPM;
+ my $urpm = URPM->new;
$urpm->parse_synthesis("synthesis.sample.cz");
$urpm->traverse(sub {
# retrieve all packages from the dependency list
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;