[Module-build-checkins] t/moduleinfo.t,1.9,1.10

[Ken W. <ke...@ma...>]

[For some reason I hit control-c while the cvs change mailer was 
running, so here's a facsimile of the report it would have generated.]


Add a new test case we currently fail on


Index: t/moduleinfo.t
===================================================================
RCS file: /cvsroot/module-build/Module-Build/t/moduleinfo.t,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -r1.9 -r1.10
--- t/moduleinfo.t	22 Aug 2005 12:24:36 -0000	1.9
+++ t/moduleinfo.t	19 Sep 2005 15:13:29 -0000	1.10
@@ -3,7 +3,7 @@
  use lib 't/lib';
  use strict;

-use Test::More tests => 48;
+use Test::More tests => 50;


  use File::Spec ();
@@ -126,6 +126,13 @@
      # whatever
  }
  ---
+  <<'---', # $VERSION declared as package variable from within 'main' 
package
+$Simple::VERSION = '1.23';
+{
+  package Simple;
+  $x = $y, $cats = $dogs;
+}
+---
  );

  my( $i, $n ) = ( 1, scalar( @modules ) );