public/openssl
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Change the transfer perl module so the real module gets properly registered

Browse source 
This is an important move if scripts want to refer to the loaded
module without having perl think it needs to be loaded (again).

Reviewed-by: Rich Salz <rsalz@openssl.org>
This commit is contained in:
Richard Levitte 2016-02-04 19:41:56 +01:00
parent 52739e40cc
commit 1cc98f75bf
1 changed files with 4 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

7
external/perl/transfer/Text/Template.pm vendored
View file

@ -5,8 +5,9 @@
BEGIN {
use File::Spec::Functions;
use File::Basename;
use lib catdir(dirname(__FILE__), "..", "..");
my $texttemplate = catfile("Text-Template-1.46", "lib", "Text", "Template.pm");
require $texttemplate;
use lib catdir(dirname(__FILE__), "..", "..",
"Text-Template-1.46", "lib");
use Text::Template;
shift @INC; # Takes away the effect of use lib
}
1;