diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-03-15 08:08:54 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-03-15 08:08:54 +0000 |
commit | 833b5f150c0526e8edac221f95b39893cefabde3 (patch) | |
tree | 39a8e312f95e64b9111c4f4af187bfc317750ee5 | |
parent | f416a1c766406fc6372b18b385fd60727acad10b (diff) | |
download | mgatools-833b5f150c0526e8edac221f95b39893cefabde3.tar mgatools-833b5f150c0526e8edac221f95b39893cefabde3.tar.gz mgatools-833b5f150c0526e8edac221f95b39893cefabde3.tar.bz2 mgatools-833b5f150c0526e8edac221f95b39893cefabde3.tar.xz mgatools-833b5f150c0526e8edac221f95b39893cefabde3.zip |
perl_checker style
-rw-r--r-- | pm/MGATools/rpmsrate.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/pm/MGATools/rpmsrate.pm b/pm/MGATools/rpmsrate.pm index 73ad976..9c39b56 100644 --- a/pm/MGATools/rpmsrate.pm +++ b/pm/MGATools/rpmsrate.pm @@ -80,7 +80,7 @@ sub cleanrpmsrate { my $kernel_like = "((?:(?:NVIDIA_)?kernel|NVIDIA_nforce|cm2020).*)"; my $dkms_like = "(.*)([-_])kernel-([0-9]+(?:\.[0-9]+){2,3}-[0-9]+(?:.[^.]+){0,2}md[vk])(.*)"; my $rpmsrate_dkms_like = "(.*[-_]kernel)(.*)"; - my $urpm2 = new URPM; + my $urpm2 = URPM->new; foreach my $dir (keys %$reprpms) { foreach (@{$reprpms->{$dir}}) { |