From 6b1baa8f1b754a0cdd58d483b2e98ab9bdd64075 Mon Sep 17 00:00:00 2001 From: Jason Downs Date: Fri, 4 Oct 1996 08:51:45 +0000 Subject: Fix a bug in an internal perl build script fragment that caused a bogus Makefile to be built for the sdbm library subdir. --- gnu/usr.bin/perl/lib/ExtUtils/MM_Unix.pm | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) (limited to 'gnu/usr.bin') diff --git a/gnu/usr.bin/perl/lib/ExtUtils/MM_Unix.pm b/gnu/usr.bin/perl/lib/ExtUtils/MM_Unix.pm index 8afae260385..332a6c6912c 100644 --- a/gnu/usr.bin/perl/lib/ExtUtils/MM_Unix.pm +++ b/gnu/usr.bin/perl/lib/ExtUtils/MM_Unix.pm @@ -1,7 +1,7 @@ package ExtUtils::MM_Unix; -$VERSION = substr q$Revision: 1.1 $, 10; -# $Id: MM_Unix.pm,v 1.1 1996/08/19 10:12:39 downsj Exp $ +$VERSION = substr q$Revision: 1.2 $, 10; +# $Id: MM_Unix.pm,v 1.2 1996/10/04 08:51:44 downsj Exp $ require Exporter; use Config; @@ -2544,7 +2544,9 @@ realclean purge :: clean push(@m, " $self->{RM_F} \$(INST_DYNAMIC) \$(INST_BOOT)\n"); push(@m, " $self->{RM_F} \$(INST_STATIC)\n"); } - push(@m, " $self->{RM_F} " . join(" ", values %{$self->{PM}}) . "\n"); + if ( values %{$self->{PM}} ){ + push(@m, " $self->{RM_F} " . join(" ", values %{$self->{PM}}) . "\n"); + } my(@otherfiles) = ($self->{MAKEFILE}, "$self->{MAKEFILE}.old"); # Makefiles last push(@otherfiles, $attribs{FILES}) if $attribs{FILES}; -- cgit v1.2.3