diff options
Diffstat (limited to 'src/test/perl/RecursiveCopy.pm')
| -rw-r--r-- | src/test/perl/RecursiveCopy.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/test/perl/RecursiveCopy.pm b/src/test/perl/RecursiveCopy.pm index 5bce720b356..baf5d0ac63b 100644 --- a/src/test/perl/RecursiveCopy.pm +++ b/src/test/perl/RecursiveCopy.pm @@ -71,7 +71,7 @@ sub copypath { croak "if specified, filterfn must be a subroutine reference" unless defined(ref $params{filterfn}) - and (ref $params{filterfn} eq 'CODE'); + and (ref $params{filterfn} eq 'CODE'); $filterfn = $params{filterfn}; } |