diff options
| author | Thierry Vignaud <tv@mageia.org> | 2013-05-22 07:38:15 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mageia.org> | 2013-05-22 07:38:15 +0000 |
| commit | 3afc68e1bc9cdd740be5036dc83c1c1a18675b08 (patch) | |
| tree | 54f11b927dcc7f92a2adcf8fd7920d4f34f9718b /src-rpm-list | |
| parent | 0ee744bc02a27443effa50b7330fcb73b1d7fb5b (diff) | |
| download | release-3afc68e1bc9cdd740be5036dc83c1c1a18675b08.tar release-3afc68e1bc9cdd740be5036dc83c1c1a18675b08.tar.gz release-3afc68e1bc9cdd740be5036dc83c1c1a18675b08.tar.bz2 release-3afc68e1bc9cdd740be5036dc83c1c1a18675b08.tar.xz release-3afc68e1bc9cdd740be5036dc83c1c1a18675b08.zip | |
perl_checker cleanups
Diffstat (limited to 'src-rpm-list')
| -rwxr-xr-x | src-rpm-list | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src-rpm-list b/src-rpm-list index e5a8bf9..984fe4f 100755 --- a/src-rpm-list +++ b/src-rpm-list @@ -25,7 +25,7 @@ my @skip = $skipfile ? chomp_(cat_($skipfile)) : (); my @pkgs = grep { my $res = 1; foreach my $skipre (@skip) { - if ($_ =~ m/^$skipre$/) { + if (m/^$skipre$/) { $res = 0; last; } |