| Subject: | ProhibitReusedNames vs "our" of multi-package file |
| Date: | Mon, 02 Mar 2009 08:50:59 +1100 |
| To: | bug-Perl-Critic [...] rt.cpan.org |
| From: | Kevin Ryde <user42 [...] zip.com.au> |
With the current perlcritic cvs I noticed ProhibitReusedNames objects to
multiple "our @ISA" for multiple packages in a single file, where I
hoped that would be allowed. Failing bit of .run below ...
Index: ProhibitReusedNames.run
===================================================================
--- ProhibitReusedNames.run (revision 3202)
+++ ProhibitReusedNames.run (working copy)
@@ -270,6 +270,17 @@
#-----------------------------------------------------------------------------
+## name Our in new package
+## failures 0
+## cut
+
+package Foo;
+our @ISA;
+package Bar;
+our @ISA;
+
+#-----------------------------------------------------------------------------
+
##############################################################################
# $URL$
# $Date$