From 9b6a0d83d135fad376b4eadcb2bd7bd8c8a07aa5 Mon Sep 17 00:00:00 2001 From: Mystery Man Date: Thu, 20 Oct 2005 14:05:54 +0000 Subject: This commit was manufactured by cvs2svn to create tag 'V10_34_11_100mdk'. --- perl-install/devices.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/devices.pm') diff --git a/perl-install/devices.pm b/perl-install/devices.pm index 434397a61..8a3654566 100644 --- a/perl-install/devices.pm +++ b/perl-install/devices.pm @@ -38,7 +38,7 @@ sub del_loop { run_program::run("losetup", "-d", $dev); } sub find_free_loop() { - foreach (0..7) { + foreach (0..255) { my $dev = make("loop$_"); sysopen(my $F, $dev, 2) or next; !ioctl($F, c::LOOP_GET_STATUS(), my $_tmp) && $! == 6 or next; #- 6 == ENXIO -- cgit v1.2.1