Branch Coverage

blib/lib/DBIx/Class/Ordered.pm
Criterion Covered Total %
branch 71 82 86.5


line true false branch
171 390 0 defined $position ? :
190 582 259 defined $position ? :
214 246 14 defined $psib ? :
235 116 14 defined $fsib ? :
255 246 14 defined $nsib ? :
275 116 14 defined $lsib ? :
319 14 51 unless defined $self->_last_sibling_posval
349 47 82 unless defined $last_posval
366 14 564 if $to_position < 1
371 31 533 if ($is_txn = $self->result_source->schema->storage->transaction_depth) { }
2 531 elsif ($self->is_column_changed($position_column)) { }
402 80 484 if ($from_position == $to_position)
406 30 454 $is_txn ? :
409 258 226 if ($from_position < $to_position) { }
421 17 467 if (grep {$_ eq $position_column;} map({@$_;} values %{+{$self->result_source->unique_constraints};}))
428 454 30 if $guard
451 6 13 unless (ref $to_group eq 'HASH')
454 0 6 if @gcols > 1
460 0 19 if defined $to_position and $to_position < 1
466 16 8 if ($self->is_column_changed($_))
472 0 19 if ($self->_is_in_group($to_group))
474 0 0 if (defined $to_position)
492 5 14 if (not defined $to_position or $to_position > $new_group_last_position) { }
493 5 0 $new_group_last_position ? :
525 238 25 unless ($self->get_column($position_column))
527 169 69 defined $lsib_posval ? :
552 554 16 if $self->result_source->schema->{'_ORDERED_INTERNAL_UPDATE'}
555 8 8 if $upd
564 1 15 if (not keys %$changed_ordering_cols) { }
13 2 elsif (defined &first(sub { exists $changed_ordering_cols->{$_}; } , @group_columns)) { }
580 5 8 exists $changed_ordering_cols->{$position_column} ? :
638 0 789 unless defined $val
717 0 498 unless $direction
722 258 240 if ($direction < 0) { }
742 17 481 if (&first(sub { $_ eq $position_column; } , map({@$_;} values %{+{$rsrc->unique_constraints};}))) { }
751 0 34 $op eq '+' ? :
773 972 259 defined($pos = $self->get_column($position_column)) ? :
802 1130 1271 if (ref $col eq 'ARRAY') { }
1119 152 elsif ($col) { }
818 0 19 if join("\000", sort(keys %$current)) ne join("\000", sort(keys %$other))
824 19 2 if $current->{$key} ne $other->{$key}