From 19bb4ad507e8e3bd9bcd3f4868f7221ba77e97bd Mon Sep 17 00:00:00 2001 From: damien Date: Mon, 26 Feb 2001 16:51:03 +0000 Subject: short-circuit to bootlook for the moment. --- perl-install/standalone/drakboot | 20 +++++++++++--------- 1 file changed, 11 insertions(+), 9 deletions(-) diff --git a/perl-install/standalone/drakboot b/perl-install/standalone/drakboot index 277688a58..7e73f5092 100755 --- a/perl-install/standalone/drakboot +++ b/perl-install/standalone/drakboot @@ -2,15 +2,17 @@ use lib qw(/usr/lib/libDrakX); -use common qw(:common :file :functional); -use interactive; -use standalone; -use any; -use bootloader; -use detect_devices; -use fsedit; -use fs; -use c; +require bootlook; + +#-use common qw(:common :file :functional); +#-use interactive; +#-use standalone; +#-use any; +#-use bootloader; +#-use detect_devices; +#-use fsedit; +#-use fs; +#-use c; $::isEmbedded = ($::XID, $::CCPID) = "@ARGV" =~ /--embedded (\w+) (\w+)/; local $_ = join '', @ARGV; -- cgit v1.2.1