Browse Source

cvsimport: set up commit environment in perl instead of using env

Signed-off-by: Junio C Hamano <junkio@cox.net>
maint
Jeff King 19 years ago committed by Junio C Hamano
parent
commit
62bf0d9629
  1. 13
      git-cvsimport.perl

13
git-cvsimport.perl

@ -618,14 +618,13 @@ sub commit { @@ -618,14 +618,13 @@ sub commit {
}

my $commit_date = strftime("+0000 %Y-%m-%d %H:%M:%S",gmtime($date));
$ENV{GIT_AUTHOR_NAME} = $author_name;
$ENV{GIT_AUTHOR_EMAIL} = $author_email;
$ENV{GIT_AUTHOR_DATE} = $commit_date;
$ENV{GIT_COMMITTER_NAME} = $author_name;
$ENV{GIT_COMMITTER_EMAIL} = $author_email;
$ENV{GIT_COMMITTER_DATE} = $commit_date;
my $pid = open2(my $commit_read, my $commit_write,
'env',
"GIT_AUTHOR_NAME=$author_name",
"GIT_AUTHOR_EMAIL=$author_email",
"GIT_AUTHOR_DATE=$commit_date",
"GIT_COMMITTER_NAME=$author_name",
"GIT_COMMITTER_EMAIL=$author_email",
"GIT_COMMITTER_DATE=$commit_date",
'git-commit-tree', $tree, @commit_args);

# compatibility with git2cvs

Loading…
Cancel
Save