diff options
| -rw-r--r-- | external/perl/transfer/Text/Template.pm | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/external/perl/transfer/Text/Template.pm b/external/perl/transfer/Text/Template.pm index 13ed1eb1f7..3779df9fe9 100644 --- a/external/perl/transfer/Text/Template.pm +++ b/external/perl/transfer/Text/Template.pm @@ -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; |