diff options
-rwxr-xr-x | process.pl | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -254,8 +254,8 @@ my @think = ( }, ); -foreach(@think){ -my %deep=%{$_}; -if( grep $deep{cond}->($_), $transcript ){$deep{action}->($transcript);$found=1;} -} + foreach(@think){ + my %deep=%{$_}; + if( grep $deep{cond}->($_), $transcript ){$deep{action}->($transcript);$found=1;} + } } |