tofixup use more parens to keep older perls happy

Dual-Life · Jun 12, 2024 · 3ad4acf · 3ad4acf
1 parent d3b266b
commit 3ad4acf
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/Scalar/Util.pm b/lib/Scalar/Util.pm
@@ -32,7 +32,7 @@ if( $^V >= v5.40 ) {
   no strict 'refs';
   my $builtins = \%{"builtin::"};
 
-  *$_ = *{ $builtins->{$_} }{CODE} for qw( blessed refaddr reftype weaken unweaken );
+  *$_ = *{ $builtins->{$_} }{CODE} for (qw( blessed refaddr reftype weaken unweaken ));
   *isweak = *{ $builtins->{is_weak} }{CODE};  # renamed
 }