lei_store: quiet down "git var" failures

[public-inbox.git] / lib / PublicInbox / LeiStore.pm

diff --git a/lib/PublicInbox/LeiStore.pm b/lib/PublicInbox/LeiStore.pm
index a23efed55198e96c4ac5446c7681af235b58781c..7c62ffea0900155b72348eede2287ba599340c28 100644 (file)
--- a/lib/PublicInbox/LeiStore.pm
+++ b/lib/PublicInbox/LeiStore.pm
@@ -54,7 +54,9 @@ sub git_epoch_max  {
 
 sub git_ident ($) {
        my ($git) = @_;
-       chomp(my $i = $git->qx(qw(var GIT_COMMITTER_IDENT)));
+       open my $null, '>', '/dev/null' or die "open /dev/null: $!";
+       my $opt = { 2 => $null };
+       chomp(my $i = $git->qx(qw(var GIT_COMMITTER_IDENT), undef, $opt));
        warn "$git->{git_dir} GIT_COMMITTER_IDENT failed\n" if $?;
        $i =~ /\A(.+) <([^>]+)> [0-9]+ [-\+]?[0-9]+$/ ? ($1, $2) :
                ('lei user', 'x@example.com')