summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/harddrake2
blob: 986e9d2708409f42dbc016f7a982bd31e1a052d1 (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] [--test]\n");
    exit;
}
$::isStandalone=1;

harddrake::ui->new;