Commit ff825807 authored by Richard Levitte's avatar Richard Levitte
Browse files

VMS: fix util/[un]local.com.in to handle attributes 



Reviewed-by: default avatarMatt Caswell <matt@openssl.org>
(Merged from https://github.com/openssl/openssl/pull/8382)
parent ce506d27

util/local_shlib.com.in

+5 −1
Original line number Original line Diff line number Diff line 
${-

${-

  use File::Spec::Functions qw(rel2abs);



  my $bldtop = rel2abs($config{builddir});

  our %names = ( map { platform->sharedname($_) =>

  our %names = ( map { platform->sharedname($_) =>

                           $bldtop.platform->sharedlib($_) }

                           $bldtop.platform->sharedlib($_) }

                 @{$unified_info{install}->{libraries}} );

                 grep { !$unified_info{attributes}->{$_}->{noinst} }

                 @{$unified_info{libraries}} );

  "" -}

  "" -}

$       ! Create a local environment with the shared library logical names

$       ! Create a local environment with the shared library logical names

$       ! properly set.  Undo this with unlocal_shlib.com

$       ! properly set.  Undo this with unlocal_shlib.com

util/unlocal_shlib.com.in

+5 −1
Original line number Original line Diff line number Diff line 
${-

${-

  use File::Spec::Functions qw(rel2abs);



  my $bldtop = rel2abs($config{builddir});

  our %names = ( map { platform->sharedname($_) =>

  our %names = ( map { platform->sharedname($_) =>

                           $bldtop.platform->sharedlib($_) }

                           $bldtop.platform->sharedlib($_) }

                 @{$unified_info{install}->{libraries}} );

                 grep { !$unified_info{attributes}->{$_}->{noinst} }

                 @{$unified_info{libraries}} );

  "" -}

  "" -}

$       ! Remove the local environment created by local_shlib.com

$       ! Remove the local environment created by local_shlib.com

$

$