From 8e113b08bfdc02d1ebc89c2234d5175d4bf6933f Mon Sep 17 00:00:00 2001 From: Martin Doppelreiter Date: Fri, 28 Oct 2016 10:25:43 +0200 Subject: [PATCH] fixes undef string concatenation warning for alert text --- lib/Test/WWW/WebKit.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/Test/WWW/WebKit.pm b/lib/Test/WWW/WebKit.pm index b2c969f..20cc4ae 100644 --- a/lib/Test/WWW/WebKit.pm +++ b/lib/Test/WWW/WebKit.pm @@ -285,7 +285,7 @@ sub wait_for_alert_ok { my ($self, $text, $timeout) = @_; local $Test::Builder::Level = $Test::Builder::Level + 1; - ok($self->wait_for_alert($text, $timeout), "wait_for_alert_ok($text)") + ok($self->wait_for_alert($text, $timeout), 'wait_for_alert_ok(' . ($text // '') . ')') or diag( @{ $self->alerts } ? 'Last alert was: "' . $self->alerts->[-1] . '"'