Login
Fixed incorrect variable name
authorAndy Lester <andy@petdance.com>
Mon, 17 Jul 2006 03:47:41 +0000 (03:47 +0000)
committerAndy Lester <andy@petdance.com>
Mon, 17 Jul 2006 03:47:41 +0000 (03:47 +0000)
lib/Perl/Critic/Policy/InputOutput/RequireBracedFileHandleWithPrint.pm

index e2ba5b6..e4f916a 100644 (file)
@@ -37,7 +37,7 @@ sub violates {
     return if is_hash_key($elem);
     return if is_subroutine_name($elem);
 
-    my @sibs;
+    my @sib;
     $sib[0] = $elem->snext_sibling()  || return;
 
     # Deal with situations where 'print' is called with parens