summaryrefslogtreecommitdiff
path: root/git-svn.perl
diff options
context:
space:
mode:
authorDavid D. Kilzer <ddkilzer@kilzer.net>2010-08-15 13:15:54 (GMT)
committerEric Wong <normalperson@yhbt.net>2010-08-15 23:43:35 (GMT)
commit54fb7f9b08270873b0646d84164e1cebe2deb857 (patch)
tree3ca95811c2951da3d014947408bde35309aec522 /git-svn.perl
parent3d045897585c4b1ca0dce6bb5a33331f1b48c2bf (diff)
downloadgit-54fb7f9b08270873b0646d84164e1cebe2deb857.zip
git-54fb7f9b08270873b0646d84164e1cebe2deb857.tar.gz
git-54fb7f9b08270873b0646d84164e1cebe2deb857.tar.bz2
git-svn: fix regex to remove "tail" from svn tags
Fix a regular expression used to remove the revision from the end of an svn tag or branch name. The regex did not account for any "tail" (dashes) that may have been added to the end of the tag name (which first appeared in v1.4.1-rc2~11). If not fixed, tags with names like "tags/mytag@5--@2" may be created. Signed-off-by: David D. Kilzer <ddkilzer@kilzer.net> Acked-by: Eric Wong <normalperson@yhbt.net>
Diffstat (limited to 'git-svn.perl')
-rwxr-xr-xgit-svn.perl2
1 files changed, 1 insertions, 1 deletions
diff --git a/git-svn.perl b/git-svn.perl
index 34884b8..39bcb45 100755
--- a/git-svn.perl
+++ b/git-svn.perl
@@ -2959,7 +2959,7 @@ sub other_gs {
my $gs = Git::SVN->find_by_url($new_url, $url, $branch_from);
unless ($gs) {
my $ref_id = $old_ref_id;
- $ref_id =~ s/\@\d+$//;
+ $ref_id =~ s/\@\d+-*$//;
$ref_id .= "\@$r";
# just grow a tail if we're not unique enough :x
$ref_id .= '-' while find_ref($ref_id);