diff --git a/git-svnimport.perl b/git-svnimport.perl
index b73d6494d80fe5ee19e1d95971e2e4e64e980dea..d3ad5b904f3d025aaf89aa5a7ef2e6464fd9b5b8 100755 (executable)
--- a/git-svnimport.perl
+++ b/git-svnimport.perl
usage if $opt_h;
my $tag_name = $opt_t || "tags";
-my $trunk_name = $opt_T || "trunk";
+my $trunk_name = defined $opt_T ? $opt_T : "trunk";
my $branch_name = $opt_b || "branches";
my $project_name = $opt_P || "";
$project_name = "/" . $project_name if ($project_name);
$dest =~ tr/_/\./ if $opt_u;
- system('git-tag', $dest, $cid) == 0
+ system('git-tag', '-f', $dest, $cid) == 0
or die "Cannot create tag $dest: $!\n";
print "Created tag '$dest' on '$branch'\n" if $opt_v;