summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorTodd C. Miller <millert@cvs.openbsd.org>2010-09-28 12:25:27 +0000
committerTodd C. Miller <millert@cvs.openbsd.org>2010-09-28 12:25:27 +0000
commit61caaee0289ea73c1b479d7d6bb693f84edd69c7 (patch)
treec68bdcafb7a1cf9a40673823878060cef3b4013c
parent4823863b74461c5dcb42c7b322631a37d7659154 (diff)
Undo last change now that RCS keyword expansion is disabled on the perl sources
-rwxr-xr-xgnu/usr.bin/perl/cpan/ExtUtils-MakeMaker/t/parse_version.t6
-rwxr-xr-xgnu/usr.bin/perl/cpan/Module-Build/t/metadata.t4
-rwxr-xr-xgnu/usr.bin/perl/cpan/Module-Build/t/moduleinfo.t4
3 files changed, 7 insertions, 7 deletions
diff --git a/gnu/usr.bin/perl/cpan/ExtUtils-MakeMaker/t/parse_version.t b/gnu/usr.bin/perl/cpan/ExtUtils-MakeMaker/t/parse_version.t
index da5d9511c1f..858e2941813 100755
--- a/gnu/usr.bin/perl/cpan/ExtUtils-MakeMaker/t/parse_version.t
+++ b/gnu/usr.bin/perl/cpan/ExtUtils-MakeMaker/t/parse_version.t
@@ -12,7 +12,7 @@ my $Has_Version = eval 'require version; "version"->import; 1';
my %versions = (q[$VERSION = '1.00'] => '1.00',
q[*VERSION = \'1.01'] => '1.01',
- q[($VERSION) = q/Revision: 32208 / =~ /(\d+)/g;] => 32208,
+ q[($VERSION) = q$Revision: 32208 $ =~ /(\d+)/g;] => 32208,
q[$FOO::VERSION = '1.10';] => '1.10',
q[*FOO::VERSION = \'1.11';] => '1.11',
'$VERSION = 0.02' => 0.02,
@@ -34,8 +34,8 @@ my %versions = (q[$VERSION = '1.00'] => '1.00',
qq[\$Something::VERSION == 1.0\n\$VERSION = 2.3\n] => '2.3',
qq[\$Something::VERSION == 1.0\n\$VERSION = 2.3\n\$VERSION = 4.5\n] => '2.3',
- '$VERSION = sprintf("%d.%03d", q/Revision: 3.74 / =~ /(\d+)\.(\d+)/);' => '3.074',
- '$VERSION = substr(q/Revision: 2.8 /, 10) + 2 . "";' => '4.8',
+ '$VERSION = sprintf("%d.%03d", q$Revision: 3.74 $ =~ /(\d+)\.(\d+)/);' => '3.074',
+ '$VERSION = substr(q$Revision: 2.8 $, 10) + 2 . "";' => '4.8',
);
diff --git a/gnu/usr.bin/perl/cpan/Module-Build/t/metadata.t b/gnu/usr.bin/perl/cpan/Module-Build/t/metadata.t
index 81966c4f651..1ac35b28c47 100755
--- a/gnu/usr.bin/perl/cpan/Module-Build/t/metadata.t
+++ b/gnu/usr.bin/perl/cpan/Module-Build/t/metadata.t
@@ -171,9 +171,9 @@ is_deeply($mb->find_dist_packages,
{
$dist->change_file( 'lib/Simple.pm', <<'---' );
package Simple;
-$VERSION = version->new('0.60.' . (qw/Revision: 128 /)[1]);
+$VERSION = version->new('0.60.' . (qw$Revision: 128 $)[1]);
package Simple::Simon;
-$VERSION = version->new('0.61.' . (qw/Revision: 129 /)[1]);
+$VERSION = version->new('0.61.' . (qw$Revision: 129 $)[1]);
---
$dist->regen;
my $provides = new_build()->get_metadata()->{provides};
diff --git a/gnu/usr.bin/perl/cpan/Module-Build/t/moduleinfo.t b/gnu/usr.bin/perl/cpan/Module-Build/t/moduleinfo.t
index 9c10448624c..e28726d493a 100755
--- a/gnu/usr.bin/perl/cpan/Module-Build/t/moduleinfo.t
+++ b/gnu/usr.bin/perl/cpan/Module-Build/t/moduleinfo.t
@@ -424,9 +424,9 @@ __DATA__
# Make sure we handle version.pm $VERSIONs well
$dist->change_file( 'lib/Simple.pm', <<'---' );
package Simple;
-$VERSION = version->new('0.60.' . (qw/Revision: 128 /)[1]);
+$VERSION = version->new('0.60.' . (qw$Revision: 128 $)[1]);
package Simple::Simon;
-$VERSION = version->new('0.61.' . (qw/Revision: 129 /)[1]);
+$VERSION = version->new('0.61.' . (qw$Revision: 129 $)[1]);
---
$dist->regen;