diff options
author | Richard Levitte <richard@levitte.org> | 2016-01-22 12:40:49 +0100 |
---|---|---|
committer | Richard Levitte <richard@levitte.org> | 2016-01-22 23:12:22 +0100 |
commit | 632b3092807db45251711e39dcd7d55a16d12957 (patch) | |
tree | adc4b3fdf633951447af1b9eef65aa69581f8170 /util/dofile.pl | |
parent | 8ff2af548303d311ce3591406111f77862875a60 (diff) | |
download | openssl-632b3092807db45251711e39dcd7d55a16d12957.tar.gz |
Refactor file writing - adapt util/dofile.pl to use with_fallback
Reviewed-by: Rich Salz <rsalz@openssl.org>
Diffstat (limited to 'util/dofile.pl')
-rw-r--r-- | util/dofile.pl | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/util/dofile.pl b/util/dofile.pl index 4bf90babbf..74d1520ed0 100644 --- a/util/dofile.pl +++ b/util/dofile.pl @@ -7,7 +7,13 @@ use strict; use warnings; -use Text::Template; + +# Because we know that Text::Template isn't a core Perl module, we use +# a fallback in case it's not installed on the system +use File::Basename; +use File::Spec::Functions; +use lib catdir(dirname(__FILE__)); +use with_fallback qw(Text::Template); # We actually expect to get the following hash tables from configdata: # |