my $help;
my $man;
my $externalDir;
+my $nowhitespace;
my $result = GetOptions("help|?" => \$help,
+ "nofixwhitespace" => \$nowhitespace,
"man" => \$man,
"externaldir=s" => \$externalDir);
$author="--author '$author'" if ($author);
system("git commit -F $tempdir/commit-msg $author") == 0
or die "Commit failed : $!\n";
+ if ($nowhitespace) {
+ print STDERR "WARNING: not fixing whitespace errors.\n";
+ } else {
+ system("git rebase --whitespace=fix HEAD^") == 0
+ or print STDERR "WARNING: Fixing whitespace errors failed.\n";
+ }
}
};
--help brief help message
--man full documentation
--externalDir exact path to import into
+ --nofixwhitespace don't apply whitespace fixes
=head1 DESCRIPTION