fixed UUV

yappo · Apr 21, 2009 · e1d2902 · e1d2902
1 parent 42a9f33
commit e1d2902
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/Devel/RunOpsAnalyze.pm b/lib/Devel/RunOpsAnalyze.pm
@@ -42,7 +42,7 @@ sub analyze (&) { ## no critic
     for my $seq (sort { $a <=> $b } keys %{ $trace }) {
         my $stash = $trace->{$seq};
 
-        if ($stash->{before_op_seq} && $trace->{$stash->{before_op_seq}}->{package} eq __PACKAGE__) {
+        if ($stash->{before_op_seq} && $trace->{$stash->{before_op_seq}} && $trace->{$stash->{before_op_seq}}->{package} eq __PACKAGE__) {
             # delete first steps
             next;
         }