Permalink
Browse files

Avoid perl undef warning

  • Loading branch information...
sharyanto committed Oct 4, 2012
1 parent bb05955 commit 685528ad2477de44daa37a63a79ee646c518e86d
Showing with 1 addition and 1 deletion.
  1. +1 −1 lib/Devel/EndStats.pm
View
@@ -178,7 +178,7 @@ END {
$inc_info{$r}{time} ||= 0;
$stats .= sprintf "# #%3d %5d lines %7.3fms(%3d%%) %s (loaded by %s)\n",
$inc_info{$r}{order}, $inc_info{$r}{lines}, $inc_info{$r}{time}*1000, $secs ? $inc_info{$r}{time}/$secs*100 : 0,
- $r, $inc_info{$r}{caller};
+ $r, ($inc_info{$r}{caller} // "?");
}
}

0 comments on commit 685528a

Please sign in to comment.