From 21ee7d23cf3f2b8c8db477159e52fc52e2135392 Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.org>
Date: Wed, 21 Jan 2004 18:13:23 +0000
Subject: perl_checker fix

---
 urpmi.addmedia | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/urpmi.addmedia b/urpmi.addmedia
index 3eb0dc7c..caecc345 100755
--- a/urpmi.addmedia
+++ b/urpmi.addmedia
@@ -154,7 +154,7 @@ and [options] are from
 	    $options{distrib} eq 'updates' && $options{version} eq 'cooker' and
 	      die N("cannot add updates of a cooker distribution\n");
 	    #- get mirrors list file in urpmi cache.
-	    my ($basename) = $options{from} =~ /^.*\/([^\/]+)\/*$/;
+	    my ($basename) = $options{from} =~ m|^.*/([^/]+)/*$|;
 	    unlink "$urpm->{cachedir}/partial/$basename";
 	    eval {
 		$urpm->{log}(N("retrieving mirrors at %s ...", $options{from}));
-- 
cgit v1.2.1