New upstream version 20220217

[perltidy.git] / t / snippets22.t

diff --git a/t/snippets22.t b/t/snippets22.t
index 92563c258b62f8068a3886aed94ba6591889750b..a86591f28c8122bbafb02b51d742abeff3fa3fc8 100644 (file)
--- a/t/snippets22.t
+++ b/t/snippets22.t
@@ -46,7 +46,7 @@ BEGIN {
 -nboa
 ----------
         'braces7' => <<'----------',
--bli -blil='*'
+-bli -blil='*' -blixl='eval'
 ----------
         'def'       => "",
         'extrude'   => "--extrude",
@@ -369,11 +369,10 @@ $myfun = sub
     print("Hello, World\n");
   };
 
-eval
-  {
+eval {
     my $app = App::perlbrew->new( "install-patchperl", "-q" );
     $app->run();
-  } or do
+} or do
   {
     $error          = $@;
     $produced_error = 1;