From be2ae14d6b08f9633af1eca8293e520b8776d857 Mon Sep 17 00:00:00 2001
From: Rafael Garcia-Suarez <rgarciasuarez@mandriva.com>
Date: Wed, 20 Sep 2006 09:18:22 +0000
Subject: Notes for later.

---
 urpm.pm | 11 ++---------
 1 file changed, 2 insertions(+), 9 deletions(-)

diff --git a/urpm.pm b/urpm.pm
index e07e3bdc..83078ea2 100644
--- a/urpm.pm
+++ b/urpm.pm
@@ -18,14 +18,6 @@ our @ISA = qw(URPM);
 use URPM;
 use URPM::Resolve;
 
-BEGIN {
-    # this doesn't work for perls >= 5.9.4
-    if ($ENV{DEBUG_URPMI}) {
-	require encoding::warnings;
-	encoding::warnings->import;
-    }
-}
-
 #- this violently overrides is_arch_compat() to always return true.
 sub shunt_ignorearch {
     eval q( sub URPM::Package::is_arch_compat { 1 } );
@@ -774,15 +766,16 @@ sub add_distrib_media {
     my ($urpm, $name, $url, %options) = @_;
 
     #- make sure configuration has been read.
-    # (Olivier Thauvin): Is this a workaround ?
     $urpm->{media} or $urpm->read_config;
 
     my $distribconf;
 
     if (my ($dir) = $url =~ m!^(?:removable[^:]*:/|file:/)?(/.*)!) {
+	# FIXME obscure error message
 	$urpm->try_mounting($dir)
 	    or $urpm->{error}(N("unable to access first installation medium")), return ();
 	$distribconf = MDV::Distribconf->new($dir);
+	# FIXME ugly error message
 	$distribconf->load() or $urpm->{error}(N("this url seems to not contain any distrib")), return ();
     } else {
 	unlink "$urpm->{cachedir}/partial/media.cfg";
-- 
cgit v1.2.1