openssl/external/perl/transfer/Text/Template.pm
Richard Levitte c680f77fb1 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>
2016-02-12 18:04:49 +01:00

15 lines
533 B
Perl

#! /usr/bin/perl
# Quick transfer to the downloaded Text::Template
BEGIN {
use File::Spec::Functions;
use File::Basename;
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;