From 15f458ff86357a2695a90bad71a4ddd02d1b1197 Mon Sep 17 00:00:00 2001 From: Christophe Fergeau Date: Thu, 13 Aug 2009 13:33:08 +0000 Subject: remove debugging print --- urpm/media.pm | 4 ---- 1 file changed, 4 deletions(-) (limited to 'urpm') diff --git a/urpm/media.pm b/urpm/media.pm index 3b1cd481..61f2a6ba 100644 --- a/urpm/media.pm +++ b/urpm/media.pm @@ -165,7 +165,6 @@ sub _read_config__read_media_info { next if not -d $media_dir; $urpm->{debug} and $urpm->{debug}("parsing: $media_dir"); - print("parsing: $media_dir\n"); my $media_cfg = $media_dir . '/media.cfg'; my $distribconf = MDV::Distribconf->new($media_cfg, undef) or next; @@ -177,7 +176,6 @@ sub _read_config__read_media_info { chomp ($_); foreach my $medium ($distribconf->listmedia) { my $medium_path = reduce_pathname($_ . '/' . $distribconf->getpath($medium, 'path')); - print "medium path: $medium_path\n"; $url2mediamap{$medium_path} = [$distribconf, $medium]; } } @@ -187,10 +185,8 @@ sub _read_config__read_media_info { while () { my $mirrorlist = $_; chomp ($mirrorlist); - print "Mirrorlist: $mirrorlist\n"; foreach my $medium ($distribconf->listmedia) { my $medium_path = $distribconf->getpath($medium, 'path'); - print "medium path: $mirrorlist, $medium_path\n"; $mirrorlist2mediamap{$mirrorlist}->{$medium_path} = [$distribconf, $medium]; } } -- cgit v1.2.1