diff options
| -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; |