Code

git-checkout: Test for relative path use.
[git.git] / git-cvsimport.perl
index 2954fb846e3372a648124d92b7c1a1ccbd44306f..e4bc2b54f68930df217751975e32b4224f8d765c 100755 (executable)
@@ -818,6 +818,7 @@ while (<CVS>) {
                $state = 4;
        } elsif ($state == 4 and s/^Branch:\s+//) {
                s/\s+$//;
+               tr/_/\./ if ( $opt_u );
                s/[\/]/$opt_s/g;
                $branch = $_;
                $state = 5;