Browse files

git-cvsexportcommit: Fix calling Perl's rel2abs() on MSYS

Due to MSYS path mangling GIT_DIR contains a Windows-style path when
checked inside a Perl script even if GIT_DIR was previously set to an
MSYS-style path in a shell script. So explicitly convert to an MSYS-style
path before calling Perl's rel2abs() to make it work.

This fix was inspired by a very similar patch in WebKit:

Signed-off-by: Sebastian Schuberth <>
Tested-by: Pat Thoyts <>
Signed-off-by: Junio C Hamano <>
  • Loading branch information...
1 parent 4397c65 commit 37495eef4c6071fa124911753cfca3690ea4bf96 @sschuberth sschuberth committed with Jan 11, 2012
Showing with 7 additions and 0 deletions.
  1. +7 −0 git-cvsexportcommit.perl
@@ -30,6 +30,13 @@
$ENV{GIT_DIR} = $gd;
+ # On MSYS, convert a Windows-style path to an MSYS-style path
+ # so that rel2abs() below works correctly.
+ if ($^O eq 'msys') {
+ $ENV{GIT_DIR} =~ s#^([[:alpha:]]):/#/$1/#;
+ }
# Make sure GIT_DIR is absolute
$ENV{GIT_DIR} = File::Spec->rel2abs($ENV{GIT_DIR});

0 comments on commit 37495ee

Please sign in to comment.