diff options
| author | Hans Mulder <hansmu@xs4all.nl> | 1998-02-26 03:09:55 -0800 |
|---|---|---|
| committer | Malcolm Beattie <mbeattie@sable.ox.ac.uk> | 1998-02-27 15:31:12 +0000 |
| commit | bf99883da2fbc1b4d546abddb96990a37466b881 (patch) | |
| tree | d909f5bce1dfc4639e5a489f66e9aaba074abc7b /lib | |
| parent | c2267164204a961273c71c9c103831895724b0b1 (diff) | |
| download | perl-bf99883da2fbc1b4d546abddb96990a37466b881.tar.gz | |
[PATCH 5.004_60] Fix to MM_VMS.PM
Date: Thu, 26 Feb 1998 11:09:55 -0800
Subject: [PATCH 5.004_60] Get SDBM_File working on VMS
Date: Thu, 26 Feb 1998 11:15:24 -0800
p4raw-id: //depot/perl@594
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/ExtUtils/MM_VMS.pm | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/lib/ExtUtils/MM_VMS.pm b/lib/ExtUtils/MM_VMS.pm index dc3b4ceca6..954f6123d5 100644 --- a/lib/ExtUtils/MM_VMS.pm +++ b/lib/ExtUtils/MM_VMS.pm @@ -1422,7 +1422,21 @@ $(INST_STATIC) : $(OBJECT) $(MYEXTLIB) push(@m,' If F$Search("$(MMS$TARGET)").eqs."" Then Library/Object/Create $(MMS$TARGET) +'); + # if there was a library to copy, then we can't use MMS$SOURCE_LIST, + # 'cause it's a library and you can't stick them in other libraries. + # In that case, we use $OBJECT instead and hope for the best + if ($self->{MYEXTLIB}) { + push(@m,' + Library/Object/Replace $(MMS$TARGET) $(OBJECT) +'); + } else { + push(@m,' Library/Object/Replace $(MMS$TARGET) $(MMS$SOURCE_LIST) +'); + } + + push(@m, ' $(NOECHO) $(PERL) -e "open F,\'>>$(INST_ARCHAUTODIR)extralibs.ld\';print F qq{$(EXTRALIBS)\n};close F;" '); push @m, $self->dir_target('$(INST_ARCHAUTODIR)'); |