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';
|
