From 548d6279ed6f8821801a8d2d3030a5335dfee8db Mon Sep 17 00:00:00 2001
From: damien <damien@mandriva.com>
Date: Fri, 26 Jan 2001 18:26:49 +0000
Subject: added embedded mode

---
 perl-install/standalone/drakboot | 35 +++++++++++++++++++----------------
 1 file changed, 19 insertions(+), 16 deletions(-)

(limited to 'perl-install')

diff --git a/perl-install/standalone/drakboot b/perl-install/standalone/drakboot
index 48cbd406a..41e455a8c 100755
--- a/perl-install/standalone/drakboot
+++ b/perl-install/standalone/drakboot
@@ -12,6 +12,7 @@ use fsedit;
 use fs;
 use c;
 
+$::isEmbedded = ($::XID, $::CCPID) = "@ARGV" =~ /-embedded (\S*) (\S*)/;
 local $_ = join '', @ARGV;
 
 /-h/ and die "usage: drakboot [--expert]\n";
@@ -20,25 +21,27 @@ $::expert = /-expert/;
 
 my $in = interactive->vnew('su');
 
-my %l = (
-	 arch() !~ /sparc|alpha/ ? (
-	 _("Configure LILO/GRUB") => '',
-	 _("Create a boot floppy") => ['/usr/X11R6/bin/drakfloppy'],
-				   ) : (),
-	 _("Format floppy") => [ '/usr/bin/kfloppy', '/usr/bin/gfloppy' ],
-);
+if (!$::isEmbedded) {
+    my %l = (
+	     arch() !~ /sparc|alpha/ ? (
+					_("Configure LILO/GRUB") => '',
+					_("Create a boot floppy") => ['/usr/X11R6/bin/drakfloppy'],
+				       ) : (),
+	     _("Format floppy") => [ '/usr/bin/kfloppy', '/usr/bin/gfloppy' ],
+	    );
 
-while (my ($k, $v) = each %l) {
-    $v or next;
-    foreach (@$v) {
-	-x $_ and $l{$k} = $_, last;
+    while (my ($k, $v) = each %l) {
+	$v or next;
+	foreach (@$v) {
+	    -x $_ and $l{$k} = $_, last;
+	}
+	-x $l{$k} or delete $l{$k};
     }
-    -x $l{$k} or delete $l{$k};
-}
 
-if ($ENV{DISPLAY} && c::Xtest($ENV{DISPLAY})) {
-    my $cmd = $l{$in->ask_from_list(_("Choice"), _("What do you want to do?"), [ keys %l ])};
-    exec $cmd if $cmd;
+    if ($ENV{DISPLAY} && c::Xtest($ENV{DISPLAY})) {
+	my $cmd = $l{$in->ask_from_list(_("Choice"), _("What do you want to do?"), [ keys %l ])};
+	exec $cmd if $cmd;
+    }
 }
 
 my $bootloader = bootloader::read('', '/etc/lilo.conf');
-- 
cgit v1.2.1