From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Mon, 20 Jun 2005 13:32:52 +0000 (+0000)
Subject: Same fix, for the test, now.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=7e3ec654269fdea39968d4cec52cbfcb1f030631;p=p5sagit%2Fp5-mst-13.2.git

Same fix, for the test, now.

p4raw-id: //depot/perl@24912
---

diff --git a/t/run/switches.t b/t/run/switches.t
index a63c54b..ec1ecb6 100644
--- a/t/run/switches.t
+++ b/t/run/switches.t
@@ -221,7 +221,7 @@ SWTESTPM
 
     my $v = sprintf "%vd", $^V;
     like( runperl( switches => ['-v'] ),
-	  qr/This is perl, v$v built for $Config{archname}.+Copyright.+Larry Wall.+Artistic License.+GNU General Public License/s,
+	  qr/This is perl, $v built for $Config{archname}.+Copyright.+Larry Wall.+Artistic License.+GNU General Public License/s,
           '-v looks okay' );
 
 }