diff options
author | Andy Polyakov <appro@openssl.org> | 2011-05-16 18:11:45 +0000 |
---|---|---|
committer | Andy Polyakov <appro@openssl.org> | 2013-02-14 16:39:06 +0100 |
commit | 188ab7df986815f2eb07345c28004bde798b319d (patch) | |
tree | 16d9762273c807db58cc0771bc65898696241aac | |
parent | 2e3d02fe1a55674a2c8c7aa43586d4a1af1c42d5 (diff) |
cms-test.pl: make it work with not-so-latest perl.
(cherry picked from commit 9c437e2faded18b4ef6499d7041c65d6e216955b)
-rw-r--r-- | test/cms-test.pl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/test/cms-test.pl b/test/cms-test.pl index c938bcf00d..dfef799be2 100644 --- a/test/cms-test.pl +++ b/test/cms-test.pl @@ -415,8 +415,10 @@ sub run_smime_tests { } sub cmp_files { + use FileHandle; my ( $f1, $f2 ) = @_; - my ( $fp1, $fp2 ); + my $fp1 = FileHandle->new(); + my $fp2 = FileHandle->new(); my ( $rd1, $rd2 ); |