diff --git a/git-svn.perl b/git-svn.perl
index 9f2b587b2534e29054b5399a745d56e2ed5ea216..75e97cc72fb7906f098717797eb1ac0303ef2a19 100755 (executable)
--- a/git-svn.perl
+++ b/git-svn.perl
}
sub init_vars {
- if (defined $_repack) {
- $_repack = 1000 if ($_repack <= 0);
- $_repack_nr = $_repack;
- $_repack_flags ||= '-d';
- }
+ $_repack = 1000 unless (defined $_repack && $_repack > 0);
+ $_repack_nr = $_repack;
+ $_repack_flags ||= '-d';
}
sub verify_remotes_sanity {
0, $self->svm_uuid);
}
print " = $commit ($self->{ref_id})\n";
- if (defined $_repack && (--$_repack_nr == 0)) {
+ if ($_repack && (--$_repack_nr == 0)) {
$_repack_nr = $_repack;
# repack doesn't use any arguments with spaces in them, does it?
print "Running git repack $_repack_flags ...\n";