소스 검색

Refactor file writing - adapt util/dofile.pl to use with_fallback

Reviewed-by: Rich Salz <rsalz@openssl.org>
Richard Levitte 8 년 전
부모
커밋
632b309280
1개의 변경된 파일7개의 추가작업 그리고 1개의 파일을 삭제
  1. 7 1
      util/dofile.pl

+ 7 - 1
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:
 #