my @dists; # = 'squeeze';
my $dsc; # optional; allows use of a dsc directly
my $os = 'debian';
+my $binary_only;
GetOptions(
"arch=s" => \@archs,
"dist=s" => \@dists,
"os=s" => \$os,
"dsc=s" => \$dsc,
+ 'binary-only' => \$binary_only,
);
my $path = $ARGV[0];
#my @archcmds = map { "--arch=" . $_ } @archs;
#my @distcmds = map { "--dist=" . $_ } @dists;
+if( $binary_only ){
+ push @cowpoke_opts, "--dpkg-opts='-B'";
+} else {
+ push @cowpoke_opts, "--dpkg-opts='-sa'";
+}
+
my @cowpokecmd = ( $cowpoke, $archcmds, $distcmds, @cowpoke_opts, $dscfile );
print "Running @cowpokecmd";
system( @cowpokecmd ) == 0
or warn "Could not sign changes file $changefile: $!";
}
+print "Build complete in $local_outputdir\n";
+
sub get_source_format {
unless( -f "debian/source/format" ){
return "";