diff options
author | Michael G. Schwern <schwern@pobox.com> | 2003-03-31 07:16:57 -0800 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-04-01 16:06:12 +0000 |
commit | 3a91618cf97865fdc6d1200abc2316c97ddf570e (patch) | |
tree | f35f371365c38f36be95187e7009ac6eee971aee /ext/SDBM_File | |
parent | 3fd28c4e2d08a0b6b620046df4e9eb38af3a7913 (diff) | |
download | perl-3a91618cf97865fdc6d1200abc2316c97ddf570e.tar.gz |
MM hackery and whitespace changes
Message-ID: <20030331231657.GJ17529@windhund.schwern.org>
p4raw-id: //depot/perl@19116
Diffstat (limited to 'ext/SDBM_File')
-rw-r--r-- | ext/SDBM_File/sdbm/Makefile.PL | 29 |
1 files changed, 8 insertions, 21 deletions
diff --git a/ext/SDBM_File/sdbm/Makefile.PL b/ext/SDBM_File/sdbm/Makefile.PL index 6de7bd065a..2e576da3d6 100644 --- a/ext/SDBM_File/sdbm/Makefile.PL +++ b/ext/SDBM_File/sdbm/Makefile.PL @@ -22,34 +22,21 @@ WriteMakefile( ); 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; -} + package MY; + my $self = shift; + + $self->{INST_STATIC} = 'libsdbm$(LIB_EXT)'; -sub MY::post_constants { - package MY; - if ($^O eq 'VMS') { - shift->SUPER::post_constants(); - } else { -' -INST_STATIC = libsdbm$(LIB_EXT) -' - } + return $self->SUPER::constants(); } sub MY::top_targets { - my $noecho = shift->{NOECHO}; - my $r = ' all :: static - ' . $noecho . '$(NOOP) + $(NOECHO) $(NOOP) config :: - ' . $noecho . '$(NOOP) + $(NOECHO) $(NOOP) lint: lint -abchx $(LIBSRCS) @@ -60,7 +47,7 @@ lint: # variables into the environment so $(MYEXTLIB) is set in here to this # value which can not be built. sdbm/libsdbm.a: - ' . $noecho . '$(NOOP) + $(NOECHO) $(NOOP) ' unless $^O eq 'VMS'; return $r; |