move embedded and standalone managment from harddrake::ui to

standalone/harddrake2

1 files changed, 8 insertions, 1 deletions

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;