From 4538fce2c82a8d500f907709cbd68669ba446be6 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Fri, 20 Dec 2013 16:12:51 +0100
Subject: kill unused function

---
 perl-install/install/media.pm | 5 -----
 1 file changed, 5 deletions(-)

(limited to 'perl-install')

diff --git a/perl-install/install/media.pm b/perl-install/install/media.pm
index ef2ade7fe..5857710a8 100644
--- a/perl-install/install/media.pm
+++ b/perl-install/install/media.pm
@@ -42,11 +42,6 @@ use urpm::media;
 our $postinstall_rpms = '';
 my %mounted_media;
 
-sub _free_medium_id {
-    my ($media) = @_;
-    int(@$media);
-}
-
 sub allMediums {
     my ($packages) = @_;
 
-- 
cgit v1.2.1