cms-test.pl: make it work with not-so-latest perl.
This commit is contained in:
parent
2b9a8ca15b
commit
9c437e2fad
1 changed files with 3 additions and 1 deletions
|
@ -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 );
|
||||
|
||||
|
|
Loading…
Reference in a new issue