Browse Source

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

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>
master
Richard Levitte 6 years ago
parent
commit
1cc98f75bf
1 changed files with 4 additions and 3 deletions
  1. +4
    -3
      external/perl/transfer/Text/Template.pm

+ 4
- 3
external/perl/transfer/Text/Template.pm 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;

Loading…
Cancel
Save