We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent d00a4ad commit 590a075Copy full SHA for 590a075
src/test/modules/libpq_pipeline/t/001_libpq_pipeline.pl
@@ -9,16 +9,16 @@
9
use Test::More;
10
11
# Use Test::Differences if installed, and select unified diff output.
12
-# No decent way to select a context line count with this;
13
-# we could use a sub ref to allow that.
14
BEGIN
15
{
16
- #<<< protect next line from pgperltidy
17
- if (!eval q{ use Test::Differences; unified_diff(); 1 }) ## no critic (ProhibitStringyEval)
18
- #>>>
19
- {
20
- *eq_or_diff = \&is;
21
- }
+ eval {
+ require Test::Differences;
+ Test::Differences->import;
+ unified_diff();
+ };
+
+ # No dice -- fall back to 'is'
+ *eq_or_diff = \&is if $@;
22
}
23
24
my $node = PostgreSQL::Test::Cluster->new('main');
0 commit comments