diff options
author | Thierry Vignaud <tv@mandriva.org> | 2009-09-03 13:03:04 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mandriva.org> | 2009-09-03 13:03:04 +0000 |
commit | 3dfa11091089b0b6231c16bc795f7f17f3b9c2d5 (patch) | |
tree | 6aa36c1503d9f30d58cb91572d039efa1dbd09c4 /urpm/media.pm | |
parent | af4242ac3160f77383a0e0bae7a074a7131375e7 (diff) | |
download | urpmi-3dfa11091089b0b6231c16bc795f7f17f3b9c2d5.tar urpmi-3dfa11091089b0b6231c16bc795f7f17f3b9c2d5.tar.gz urpmi-3dfa11091089b0b6231c16bc795f7f17f3b9c2d5.tar.bz2 urpmi-3dfa11091089b0b6231c16bc795f7f17f3b9c2d5.tar.xz urpmi-3dfa11091089b0b6231c16bc795f7f17f3b9c2d5.zip |
more perl_checker cleanups
Diffstat (limited to 'urpm/media.pm')
-rw-r--r-- | urpm/media.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/urpm/media.pm b/urpm/media.pm index 4fa6c6d9..73c1fea2 100644 --- a/urpm/media.pm +++ b/urpm/media.pm @@ -172,6 +172,7 @@ sub _read_config__read_media_info { $distribconf->parse_mediacfg($media_cfg); if (open(my $URLS, '<', $media_dir . '/url')) { + local $_; while (<$URLS>) { chomp($_); foreach my $medium ($distribconf->listmedia) { @@ -182,6 +183,7 @@ sub _read_config__read_media_info { } if (open(my $MIRRORLISTS, '<', $media_dir . '/mirrorlist')) { + local $_; while (<$MIRRORLISTS>) { my $mirrorlist = $_; chomp($mirrorlist); |