summaryrefslogtreecommitdiff
path: root/gnu/usr.bin/perl/plan9/genconfig.pl
diff options
context:
space:
mode:
Diffstat (limited to 'gnu/usr.bin/perl/plan9/genconfig.pl')
-rw-r--r--gnu/usr.bin/perl/plan9/genconfig.pl12
1 files changed, 9 insertions, 3 deletions
diff --git a/gnu/usr.bin/perl/plan9/genconfig.pl b/gnu/usr.bin/perl/plan9/genconfig.pl
index 458c4c3ee9b..d934659ec42 100644
--- a/gnu/usr.bin/perl/plan9/genconfig.pl
+++ b/gnu/usr.bin/perl/plan9/genconfig.pl
@@ -261,12 +261,18 @@ foreach (sort keys %val_vars) {
if (open(PL,"${outdir}patchlevel.h")) {
while (<PL>) {
- if (/^#define PATCHLEVEL\s+(\S+)/) { print OUT "PATCHLEVEL='$1'\n"; }
- elsif (/^#define SUBVERSION\s+(\S+)/) { print OUT "SUBVERSION='$1'\n"; }
+ if (/^#define PERL_VERSION\s+(\S+)/) {
+ print OUT "PERL_VERSION='$1'\n";
+ print OUT "PATCHLEVEL='$1'\n"; # XXX compat
+ }
+ elsif (/^#define PERL_SUBVERSION\s+(\S+)/) {
+ print OUT "PERL_SUBVERSION='$1'\n";
+ print OUT "SUBVERSION='$1'\n"; # XXX compat
+ }
}
close PL;
}
-else { warn "Can't read ${outdir}patchlevel.h - skipping 'PATCHLEVEL'"; }
+else { warn "Can't read ${outdir}patchlevel.h - skipping 'PERL_VERSION'"; }
print OUT "pager='/bin/p'\n";