| blib/lib/Data/Model/Schema/Properties.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 49 | 76 | 64.4 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 66 | 410 | 14 | 0 | exists $$options{'require'} and exists $$options{'required'} |
| 172 | 0 | 0 | 86 | exists $$sugar{$name} and $$sugar{$name} |
| 190 | 79 | 0 | 7 | @_ and ref $_[0] eq 'HASH' |
| 224 | 0 | 0 | 1430 | $column and $$self{'column'}{$column} |
| 0 | 0 | 1430 | $column and $$self{'column'}{$column} and $$self{'column'}{$column}{'type'} | |
| 242 | 389 | 16 | 8 | $inflate and ref $inflate ne 'CODE' |
| 255 | 381 | 24 | 8 | $deflate and ref $deflate ne 'CODE' |
| 280 | 16 | 20 | 16 | $inflate and ref $inflate ne 'CODE' |
| 292 | 28 | 8 | 16 | $is_utf8 and $inflate_code |
| 339 | 0 | 96 | 144 | $orig_columns and $$columns{$column} ne $val |
| line | l | !l | condition |
|---|---|---|---|
| 143 | 228 | 188 | $type || 'char' |
| 416 | 0 | $options || {} | |
| 152 | 28 | 8 | $$self{'_build_tmp'}{'utf8_column'} ||= {} |
| 160 | 0 | 52 | $$self{'aluas_column_revers_map'}{$base_name} ||= [] |
| 194 | 4 | 24 | delete $clone{'options'}{'alias_rename'} || {} |
| 287 | 0 | 52 | $$args{'charset'} || 'utf8' |
| 333 | 0 | 116 | $$opts{'charset'} || 'utf8' |
| 368 | 0 | 136 | $$opts{'charset'} || 'utf8' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 50 | 35 | 25 | 0 | $columns || $index |
| 51 | 0 | 0 | 60 | ref $index or not defined $index |
| 181 | 59 | 6 | 21 | @_ == 0 or ref $_[0] |
| 196 | 4 | 24 | 0 | $$rename_map{$alias_name} || $alias_name |
| 339 | 0 | 144 | 0 | $$orig_columns{'original_cols'}{$column} ||= $$orig_columns{'column_values'}{$column} |
| 397 | 0 | 20 | 0 | $$self{'unique'}{$index} || $$self{'index'}{$index} |
| 398 | 20 | 1574 | 0 | $key ||= $$self{'key'} |
| 421 | 20 | 0 | 0 | $$self{'unique'}{$index} || $$self{'index'}{$index} || Carp::croak("Cannot find index '${index}'") |
| 422 | 20 | 622 | 0 | $key ||= $$self{'key'} |
| 432 | 2 | 94 | 0 | $$self{'sql'} ||= 'Data::Model::Schema::SQL'->new($self) |