From b4de162ca2747d54f991932f06da4603f49eb141 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Thu, 1 Aug 2002 10:13:49 +0000 Subject: move embedded and standalone managment from harddrake::ui to standalone/harddrake2 --- perl-install/harddrake/TODO | 1 + perl-install/harddrake/ui.pm | Bin 10799 -> 10447 bytes perl-install/standalone/harddrake2 | 9 ++++++++- 3 files changed, 9 insertions(+), 1 deletion(-) diff --git a/perl-install/harddrake/TODO b/perl-install/harddrake/TODO index 0ea1714b5..5c9d7f287 100644 --- a/perl-install/harddrake/TODO +++ b/perl-install/harddrake/TODO @@ -11,6 +11,7 @@ *** non needed stuff to run X must be posponed after X11 startup **** eg: scanner/audio/printer/floppy/cdrom/tape/tv/webcam/joystick/ ... *** add updfstab as in kudzu + *** detect isapnp devices *** enable the user to force a module (isa, isapnp, ...) diff --git a/perl-install/harddrake/ui.pm b/perl-install/harddrake/ui.pm index 6eacab631..fdd3f36aa 100644 Binary files a/perl-install/harddrake/ui.pm and b/perl-install/harddrake/ui.pm differ diff --git a/perl-install/standalone/harddrake2 b/perl-install/standalone/harddrake2 index 89375e8fc..88e4c9a99 100755 --- a/perl-install/standalone/harddrake2 +++ b/perl-install/standalone/harddrake2 @@ -1,6 +1,13 @@ #!/usr/bin/perl -w use lib qw(/usr/lib/libDrakX); +use standalone; use harddrake::ui; -harddrake::ui->run; +if ("@ARGV" =~ /--help|-h/) { + print "Harddrake 2\n", $license, "\nUsage: harddrake [-h|--help]\n"; + exit; +} +$::isStandalone=1; + +harddrake::ui->new; -- cgit v1.2.1