diff options
| author | Thierry Vignaud <tv@mageia.org> | 2013-03-21 07:28:16 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mageia.org> | 2013-03-21 07:28:16 +0000 |
| commit | 04cdfc93220a8deb595dccda794fa34ae5c77f36 (patch) | |
| tree | 12034ce2d30a96508fe48452fe377c432b8b358e /urpm/sys.pm | |
| parent | 73cb41dad6924966006c0b00360c1d4f3221acbe (diff) | |
| download | urpmi-04cdfc93220a8deb595dccda794fa34ae5c77f36.tar urpmi-04cdfc93220a8deb595dccda794fa34ae5c77f36.tar.gz urpmi-04cdfc93220a8deb595dccda794fa34ae5c77f36.tar.bz2 urpmi-04cdfc93220a8deb595dccda794fa34ae5c77f36.tar.xz urpmi-04cdfc93220a8deb595dccda794fa34ae5c77f36.zip | |
simplify, let mount finds the loop device
Diffstat (limited to 'urpm/sys.pm')
| -rw-r--r-- | urpm/sys.pm | 17 |
1 files changed, 0 insertions, 17 deletions
diff --git a/urpm/sys.pm b/urpm/sys.pm index c056af73..bfe0e719 100644 --- a/urpm/sys.pm +++ b/urpm/sys.pm @@ -162,23 +162,6 @@ sub proc_mounts() { @l; } - -=item first_free_loopdev() - -Returns the first unused loop device, or an empty string if none is found. - -=cut - -sub first_free_loopdev () { - my %loopdevs = map { $_ => 1 } grep { ! -d $_ } glob('/dev/loop*'); - foreach (proc_mounts()) { - (our $dev) = split ' '; - delete $loopdevs{$dev} if $dev =~ m!^/dev/loop!; - } - my @l = keys %loopdevs; - @l ? $l[0] : ''; -} - sub trim_until_d { my ($dir) = @_; foreach (proc_mounts()) { |