diff options
| author | Hans Mulder <hansmu@xs4all.nl> | 1998-06-19 09:00:57 -0700 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-06-21 06:58:37 +0000 |
| commit | dd72c0785c8efb0b84494106a9b0c3995e1964fe (patch) | |
| tree | 3818c462e89dcde36bf0642032fb7f1b63f4589d /ext/SDBM_File | |
| parent | 47579ed3d6dea076179e860100a5c614a13411d5 (diff) | |
| download | perl-dd72c0785c8efb0b84494106a9b0c3995e1964fe.tar.gz | |
fixup patches for VMS
Message-Id: <3.0.5.32.19980619160057.032e7480@ous.edu>
p4raw-id: //depot/perl@1175
Diffstat (limited to 'ext/SDBM_File')
| -rw-r--r-- | ext/SDBM_File/sdbm/Makefile.PL | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/ext/SDBM_File/sdbm/Makefile.PL b/ext/SDBM_File/sdbm/Makefile.PL index 7008e6d471..e6fdcf9306 100644 --- a/ext/SDBM_File/sdbm/Makefile.PL +++ b/ext/SDBM_File/sdbm/Makefile.PL @@ -21,10 +21,24 @@ WriteMakefile( C => [qw(sdbm.c pair.c hash.c)] ); +sub MY::constants { + package MY; + my $r = shift->SUPER::constants(); + if ($^O eq 'VMS') { + $r =~ s/^INST_STATIC =.*$/INST_STATIC = libsdbm\$(LIB_EXT)/m + } + return $r; +} + sub MY::post_constants { + package MY; + if ($^O eq 'VMS') { + shift->SUPER::post_constants(); + } else { ' INST_STATIC = libsdbm$(LIB_EXT) ' + } } sub MY::top_targets { |