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/standalone/harddrake2 | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) (limited to 'perl-install/standalone/harddrake2') 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