diff options
| -rwxr-xr-x | lib/diagnostics.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/diagnostics.pm b/lib/diagnostics.pm index 11f0aadc30..e81581b007 100755 --- a/lib/diagnostics.pm +++ b/lib/diagnostics.pm @@ -562,6 +562,7 @@ sub splainthis { # but be aware of messsages containing " at this-or-that" my $real = 0; my @secs = split( / at / ); + return unless @secs; $_ = $secs[0]; for my $i ( 1..$#secs ){ if( $secs[$i] =~ /.+? (?:line|chunk) \d+/ ){ |