diff options
Diffstat (limited to 'unittest/unit.pl')
| -rw-r--r-- | unittest/unit.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/unittest/unit.pl b/unittest/unit.pl index 5c45c15a5b1..cae394cf9b6 100644 --- a/unittest/unit.pl +++ b/unittest/unit.pl @@ -100,7 +100,8 @@ sub run_cmd (@) { # we are replacing the straps under the feet of Test::Harness, # we need to do some basic initializations in the new straps. $Test::Harness::Strap = MySQL::Straps->new; - $Test::Harness::Strap->{callback} = \&Test::Harness::strap_callback; + $Test::Harness::Strap->{callback} = \&Test::Harness::strap_callback + if defined &Test::Harness::strap_callback; runtests @files; } |