diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2020-02-07 23:44:00 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2020-02-07 23:44:00 -0700 |
commit | 335ce93a4ae9c97ebdb22a3f0349796ef3654c3f (patch) | |
tree | 07b188a4ba4333e3c0311f9552bf1e74014f30b4 | |
parent | 4ee46956d3ed75bb3516a0e07a1235ef3c6c09ef (diff) | |
download | p5-Git-Annex-335ce93a4ae9c97ebdb22a3f0349796ef3654c3f.tar.gz |
tighten perltidy exception
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
-rw-r--r-- | t/lib/t/Util.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/lib/t/Util.pm b/t/lib/t/Util.pm index b1312f5..7309442 100644 --- a/t/lib/t/Util.pm +++ b/t/lib/t/Util.pm @@ -44,10 +44,10 @@ sub run_bin { local @ARGV = @_; my ($stdout, $stderr, $exit) = capture { my $exit; - #<<< # in order to simulate calling the program at the command # line, convert exceptions into what happens when an ordinary # perl script, invoked from the command line, calls 'die' + #<<< try { $exit = $bin->main; } catch { |