summaryrefslogtreecommitdiff
path: root/ext/SDBM_File
diff options
context:
space:
mode:
authorMichael G. Schwern <schwern@pobox.com>2003-03-31 07:16:57 -0800
committerJarkko Hietaniemi <jhi@iki.fi>2003-04-01 16:06:12 +0000
commit3a91618cf97865fdc6d1200abc2316c97ddf570e (patch)
treef35f371365c38f36be95187e7009ac6eee971aee /ext/SDBM_File
parent3fd28c4e2d08a0b6b620046df4e9eb38af3a7913 (diff)
downloadperl-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.PL29
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;