| blib/lib/FBP/Window.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 14 | 64.2 |
| line | true | false | branch |
|---|---|---|---|
| 247 | 1 | 0 | $self->can('style') ? : |
| 0 | 1 | unless my(@styles) = grep({length $_;} $self->can('style') ? $self->style : (), $self->window_style) | |
| 272 | 3 | 2 | if (length $subclass) |
| 274 | 3 | 0 | if (defined $wxclass and length $wxclass) |
| 282 | 2 | 0 | if ($wxclass =~ s/^FBP::/Wx::/) |
| 305 | 2 | 0 | if (length $subclass) |
| 307 | 1 | 1 | if (defined $header and length $header) |