diff options
author | Richard Levitte <levitte@openssl.org> | 2016-02-12 04:23:15 +0100 |
---|---|---|
committer | Richard Levitte <levitte@openssl.org> | 2016-02-12 18:04:49 +0100 |
commit | c680f77fb181483d6d6ceee8c60eac6e568898c0 (patch) | |
tree | 5475879383449db5e4db1ad3d7b7ba23cf477f5c /external/perl/transfer | |
parent | a76265574398944d686d2d0de9bacca162f555ca (diff) | |
download | openssl-c680f77fb181483d6d6ceee8c60eac6e568898c0.tar.gz |
Adjust transfer::Text::Template.pm for alternate directory name
On VMS, periods in directory names weren't allowed. To counter that,
unpackers such as VMSTAR convert periods in directory names to
underscores. We need to count that in and add an alternative library
path for Text::Template.
Reviewed-by: Rich Salz <rsalz@openssl.org>
Diffstat (limited to 'external/perl/transfer')
-rw-r--r-- | external/perl/transfer/Text/Template.pm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/external/perl/transfer/Text/Template.pm b/external/perl/transfer/Text/Template.pm index 3779df9fe9..d018e6b048 100644 --- a/external/perl/transfer/Text/Template.pm +++ b/external/perl/transfer/Text/Template.pm @@ -5,9 +5,11 @@ BEGIN { use File::Spec::Functions; use File::Basename; - use lib catdir(dirname(__FILE__), "..", "..", - "Text-Template-1.46", "lib"); + use lib catdir(dirname(__FILE__), "..", "..", "Text-Template-1.46", "lib"); + # Some unpackers on VMS convert periods in directory names to underscores + use lib catdir(dirname(__FILE__), "..", "..", "Text-Template-1_46", "lib"); use Text::Template; shift @INC; # Takes away the effect of use lib + shift @INC; # Takes away the effect of use lib } 1; |