lib/openssl/external/perl/transfer/Text/Template.pm

   1 # Copyright 2016 The OpenSSL Project Authors. All Rights Reserved.
   2 #
   3 # Licensed under the OpenSSL license (the "License").  You may not use
   4 # this file except in compliance with the License.  You can obtain a copy
   5 # in the file LICENSE in the source distribution or at
   6 # https://www.openssl.org/source/license.html
   7
   8 # Quick transfer to the downloaded Text::Template
   9
  10 BEGIN {
  11     use File::Spec::Functions;
  12     use File::Basename;
  13     use lib catdir(dirname(__FILE__), "..", "..", "Text-Template-1.46", "lib");
  14     # Some unpackers on VMS convert periods in directory names to underscores
  15     use lib catdir(dirname(__FILE__), "..", "..", "Text-Template-1_46", "lib");
  16     use Text::Template;
  17     shift @INC;                 # Takes away the effect of use lib
  18     shift @INC;                 # Takes away the effect of use lib
  19 }
  20 1;