Remove "no strict" where it's no longer needed

The dangerous code was moved to a subroutine.
ufal · Apr 24, 2024 · e082823 · e082823
1 parent d526f16
commit e082823
Showing 1 changed file with 0 additions and 4 deletions.
diff --git a/tred_refactored/btred b/tred_refactored/btred
@@ -2369,7 +2369,6 @@ sub secondaryDocumentsTo ($$) {
 sub closeFile {
     my ($grp) = @_;
     doEvalHook( $grp, "file_close_hook" ) if $grp->{FSFile};
-    no strict qw(refs);
     set_macro_variable( 'TredMacro::NodeClipboard' => undef );
 
     # close required files too, unless file remains pre-loaded
@@ -2447,7 +2446,6 @@ sub closeAllPreloaded {
 sub doEvalHook {
     my ( $group, $hook ) = ( shift, shift );
     return if $NO_HOOKS;
-    no strict qw(refs);
     return unless $hook;    # and $group->{'currentNode'};
 
     my $old_ctxt = TrEd::Macros::save_ctxt();
@@ -2484,7 +2482,6 @@ sub doEvalHook {
 sub doEvalMacro {
     my ( $group, $macro ) = ( shift, shift );
     return unless $macro;
-    no strict qw(refs);
     set_macro_variable(
         this           => $group->{currentNode},
         root           => $group->{root},
@@ -2695,7 +2692,6 @@ sub switchContext {
 
 sub updateTredMacroGlobals {
     my ($grp) = @_;
-    no strict qw(refs);
     set_macro_variable(
         root => $grp->{root},
         this => $grp->{currentNode}