summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/harddrake2
blob: 850f840d2f0f24f97e0a66cfe59bd462b049c91c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
#!/usr/bin/perl

use lib qw(/usr/lib/libDrakX);
use standalone;
use harddrake::ui;

if ("@ARGV" =~ /--help|-h/) {
    print "Harddrake 2\n", $harddrake::ui::license, N("\nUsage: harddrake [-h|--help] [--test]\n");
    exit;
}
$::isStandalone=1;

harddrake::ui->new;