about summary refs log tree commit homepage
diff options
context:
space:
mode:
authorEric Wong <e@80x24.org>2021-06-22 10:04:36 +0000
committerEric Wong <e@80x24.org>2021-06-22 18:54:28 +0000
commita5be5d6f2db0b56dcc1d6034071458d75006670c (patch)
treebb615d4d0d987a2d6e998bd30c10a8f2f14334df
parent8e112fe221a74c2689c0a43576ed766deb0397e4 (diff)
downloadpublic-inbox-a5be5d6f2db0b56dcc1d6034071458d75006670c.tar.gz
This is for consistency with the open() at initial accept, in
case we hit a code path which expects Perl directory handles
rather than "file handles".  Both work with the chdir() perlop
(fchdir(2), in our case).
-rw-r--r--lib/PublicInbox/LEI.pm6
1 files changed, 1 insertions, 5 deletions
diff --git a/lib/PublicInbox/LEI.pm b/lib/PublicInbox/LEI.pm
index 546fa773..cffe4dce 100644
--- a/lib/PublicInbox/LEI.pm
+++ b/lib/PublicInbox/LEI.pm
@@ -762,11 +762,7 @@ sub dispatch {
                                 next if $d eq ''; # same as git(1)
                                 chdir $d or return fail($self, "cd $d: $!");
                         }
-                        if (delete $self->{3}) { # update cwd for rel2abs
-                                opendir my $dh, '.' or
-                                        return fail($self, "opendir . $!");
-                                $self->{3} = $dh;
-                        }
+                        open $self->{3}, '.' or return fail($self, "open . $!");
                 }
                 $cb->($self, @argv);
         } elsif (grep(/\A-/, $cmd, @argv)) { # --help or -h only