From 13b948be04dd996e7776dc7e02c04de47828d48a Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Thu, 7 Oct 2004 05:10:02 +0000 Subject: (first_modem) fix crash at install time --- perl-install/network/modem.pm | 1 + 1 file changed, 1 insertion(+) (limited to 'perl-install') diff --git a/perl-install/network/modem.pm b/perl-install/network/modem.pm index 0af9d9ffa..18755d0cb 100644 --- a/perl-install/network/modem.pm +++ b/perl-install/network/modem.pm @@ -10,6 +10,7 @@ use network::tools; sub first_modem { my ($netc) = @_; + return "/mnt/root" if $::isInstall; first(grep { $_->{device} =~ m!^/dev! } values %{$netc->{autodetect}{modem}}); } -- cgit v1.2.1