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

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

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

harddrake::ui->new;