Permalink
Browse files

perlcritic does not like - Variable declared in conditional statement

git-svn-id: https://svn.parrot.org/parrot/trunk@48056 d31e2699-5ff4-0310-a27c-f18f2fbe73fe
  • Loading branch information...
mikehh
mikehh committed Jul 8, 2010
1 parent 3fe919a commit 55fab15af95b9f76f095cae90f147f53f5604136
Showing with 3 additions and 2 deletions.
  1. +3 −2 t/library/pcre.t
View
@@ -1,5 +1,5 @@
#!perl
-# Copyright (C) 2001-2009, Parrot Foundation.
+# Copyright (C) 2001-2010, Parrot Foundation.
# $Id$
use strict;
@@ -101,7 +101,8 @@ Loaded
OUT
## 2
- my @todo = ( todo => '3..5 fail on Win32' ) if $^O =~ /MSWin32/;
+ my @todo;
+ @todo = ( todo => '3..5 fail on Win32' ) if $^O =~ /MSWin32/;
pir_output_is( <<"CODE", <<'OUT', 'soup to nuts', @todo );
.include 'iglobals.pasm'

0 comments on commit 55fab15

Please sign in to comment.