From 1a0911331fb172b541c764904b5174afee1bf64b Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 29 Feb 2008 16:47:00 +0000 Subject: remove some functions that were moved to urpm::cdrom --- urpm/removable.pm | 27 --------------------------- 1 file changed, 27 deletions(-) diff --git a/urpm/removable.pm b/urpm/removable.pm index c6e1bf29..982b5b26 100644 --- a/urpm/removable.pm +++ b/urpm/removable.pm @@ -17,33 +17,6 @@ sub _file_or_synthesis_dir { file_from_local_medium($medium, $o_url); } -#- side-effects: $blists_url->[_]{medium}{mntpoint} -sub _find_blist_url_matching { - my ($urpm, $blists_url, $mntpoint) = @_; - - my @l; - foreach my $blist (@$blists_url) { - $blist->{medium}{mntpoint} and next; - - # set it, then verify - $blist->{medium}{mntpoint} = $mntpoint; - if (-r _file_or_synthesis_dir($blist->{medium}, $blist->{url})) { - $urpm->{log}("found cdrom $blist->{medium}{name} mounted in $mntpoint"); - push @l, $blist; - } else { - delete $blist->{medium}{mntpoint}; - } - } - @l; -} - -#- side-effects: none -sub _look_for_mounted_cdrom_in_mtab() { - - map { $_->{mntpoint} } - grep { $_->{fs} eq 'iso9660' || $_->{fs} eq 'udf' } urpm::sys::read_mtab(); -} - #- side-effects: #- + those of _try_mounting_medium ($medium->{mntpoint}) sub try_mounting_medium { -- cgit v1.2.1