Remove unused variable from the _log_test method

oposs · Oct 2, 2024 · 47bb044 · 47bb044
1 parent 141d8d1
commit 47bb044
Show file tree

Hide file tree

Showing 2 changed files with 1 addition and 1 deletion.
diff --git a/CHANGES b/CHANGES
@@ -2,6 +2,7 @@
 
  - fix link to issue tracker
  - fix shift warnings in Perl v5.40
+ - remove unused variable
 
 0.2.1 2021-09-06 08:36:03 +0200 Tobias Oetiker <[email protected]>
 

diff --git a/lib/Test/Mojo/Role/Log.pm b/lib/Test/Mojo/Role/Log.pm
@@ -40,7 +40,6 @@ sub _log_test ($self,$rx,$level,$like,$desc=undef) {
     $desc //= "log ".
         (defined $level ? "level=$level ":"").
         ($like eq 'like' ? "" : "un")."like $rx";
-    my $ok = $like ? 0 : 1;
     my $logs = '';
     for my $entry (@{$self->logCache}){
         my ($l,@msg) =  @$entry;