use Dpkg::Version;
use POSIX;
+our $dgit_version = 0.14;
+
our $isuite = 'unstable';
our $idistro;
our $package;
exit 8;
}
-sub helponly () {
+sub cmd_help () {
print $helpmsg or die $!;
exit 0;
}
build_maybe_quilt_fixup();
}
+sub cmd_version {
+ print "dgit version $dgit_version\n";
+}
+
sub parseopts () {
my $om;
while (@ARGV) {
} elsif (m/^--no-sign$/) {
$sign=0;
} elsif (m/^--help$/) {
- helponly();
+ cmd_help();
} elsif (m/^--new$/) {
$new_package=1;
} elsif (m/^--(\w+)=(.*)/s &&
if (s/^-n/-/) {
$dryrun=1;
} elsif (s/^-h/-/) {
- helponly();
+ cmd_help();
} elsif (s/^-D/-/) {
open DEBUG, ">&STDERR" or die $!;
$debug++;