[Module-build-checkins] Module-Build/t moduleinfo.t,1.16,1.17

[Randy W. S. <si...@us...>]

Update of /cvsroot/module-build/Module-Build/t
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29412/t

Modified Files:
	moduleinfo.t 
Log Message:
Add regression test for detecting $VERSION assignments.

Index: moduleinfo.t
===================================================================
RCS file: /cvsroot/module-build/Module-Build/t/moduleinfo.t,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -d -r1.16 -r1.17
--- moduleinfo.t	9 Jan 2006 01:18:15 -0000	1.16
+++ moduleinfo.t	21 Feb 2006 09:15:47 -0000	1.17
@@ -2,7 +2,7 @@
 
 use strict;
 use lib $ENV{PERL_CORE} ? '../lib/Module/Build/t/lib' : 't/lib';
-use MBTest tests => 64;
+use MBTest tests => 66;
 
 use Cwd ();
 my $cwd = Cwd::cwd;
@@ -104,6 +104,13 @@
     # whatever
 }
 ---
+  <<'---', # $VERSION checked only in assignments, not regexp ops
+package Simple;
+$VERSION = '1.23';
+if ( $VERSION =~ /1\.23/ ) {
+    # whatever
+}
+---
   <<'---', # $VERSION checked only in assignments, not relational ops
 package Simple;
 $VERSION = '1.23';