t/zsh: refactor file slurping.

jwilk · Apr 29, 2024 · 572643d · 572643d
1 parent d03d11e
commit 572643d
Showing 1 changed file with 3 additions and 4 deletions.
diff --git a/t/zsh.t b/t/zsh.t
@@ -127,11 +127,10 @@ cmp_ok($n, '==', length($input), 'input');
 xnote($output);
 cmp_ok($status, 'eq', 'OK', 'found options');
 open $fh, '<', "$basedir/doc/README";
-my $readme;
-{
+my $readme = do {
     local $RS = undef;
-    $readme = <$fh>;
-}
+    <$fh>;
+};
 close $fh;
 $readme =~ /\n +options:\n((?:.+\n)+)/ or die;
 my $help_options = $1;