f6a80292c3db127d1561c118f409c1cffd1b55d9 needs to be reflected in our switch
authorNicholas Clark <nick@ccl4.org>
Sat, 20 Dec 2008 23:00:48 +0000 (23:00 +0000)
committerNicholas Clark <nick@ccl4.org>
Sat, 20 Dec 2008 23:00:48 +0000 (23:00 +0000)
testing. We're not doing very well on this one.

t/run/switches.t

index e62eda4..0d91d8a 100644 (file)
@@ -263,7 +263,7 @@ SWTESTPM
 
     my $v = sprintf "%vd", $^V;
     like( runperl( switches => ['-v'] ),
-         qr/This is perl, v$v (?:DEVEL\d+ )?built for \Q$Config{archname}\E.+Copyright.+Larry Wall.+Artistic License.+GNU General Public License/s,
+         qr/This is perl, v$v (?:DEVEL:[-A-Za-z0-9]+ )?built for \Q$Config{archname}\E.+Copyright.+Larry Wall.+Artistic License.+GNU General Public License/s,
           '-v looks okay' );
 
 }