| line |
true |
false |
branch |
|
26
|
0 |
2 |
if ($^O eq 'MSWin32') { } |
|
40
|
0 |
1 |
if @_ > 1 |
|
43
|
0 |
1 |
if (defined $opt) |
|
44
|
0 |
0 |
if ref $opt ne "HASH" |
|
48
|
0 |
0 |
if defined $opt->{$key} |
|
94
|
0 |
0 |
if ($self->{'show_context'}) { } |
|
96
|
0 |
0 |
if ($m->{'diff'}) { } |
|
100
|
0 |
0 |
if ($line_w + $m->{'str'}[$i][1] > $term_w) { } |
|
111
|
0 |
0 |
if ($top_pre_line_w <= $term_w) { } |
|
123
|
0 |
0 |
if ($m->{'str_w'} + $self->{'i'}{'max_key_w'} <= $term_w) { } |
|
127
|
0 |
0 |
if (length $self->{'i'}{'prompt'}) |
|
145
|
0 |
0 |
unless ($self->{'show_context'} and $count_chars_after) |
|
154
|
0 |
0 |
if ($line_w + $m->{'str'}[$i][1] > $term_w) |
|
163
|
0 |
0 |
if ($line_w) |
|
175
|
0 |
0 |
if ($empty > 0) { } |
|
181
|
0 |
0 |
if (get_term_height() >= 2) |
|
192
|
0 |
0 |
if (length $self->{'footer'} and $self->{'page'} != 2) |
|
195
|
0 |
0 |
if ($self->{'page'} == 2 and $self->{'clear_screen'} != 1) |
|
204
|
0 |
0 |
unless (@{$self->{'history'};}) |
|
208
|
0 |
0 |
if (&none(sub {
$_ eq $current;
}
, @{$$self{"history"};})) |
|
212
|
0 |
0 |
if (&any(sub {
$_ eq $current;
}
, @{$self->{'i'}{'prev_filtered_history'} // [];})) { } |
|
|
0 |
0 |
elsif (&any(sub {
$_ ne $current if $_ =~ /^\Q$current\E/i;
}
, @{$$self{'history'};})) { } |
|
215
|
0 |
0 |
if $_ =~ /^\Q$current\E/i |
|
216
|
0 |
0 |
if $_ =~ /^\Q$current\E/i |
|
222
|
0 |
0 |
if (@{$self->{'i'}{'prev_filtered_history'} // [];}) |
|
226
|
0 |
0 |
unless (defined $self->{'i'}{'history_idx'}) |
|
230
|
0 |
0 |
unless (defined $self->{'i'}{'history_idx'}) |
|
235
|
0 |
0 |
if ($history_up) { } |
|
236
|
0 |
0 |
if ($self->{'i'}{'history_idx'} == 0) { } |
|
244
|
0 |
0 |
if ($self->{'i'}{'history_idx'} >= $#history) { } |
|
259
|
0 |
0 |
unless (length $prompt) |
|
265
|
0 |
0 |
if ($self->{'color'}) |
|
267
|
0 |
0 |
if push @color, $1 |
|
271
|
0 |
0 |
if ($self->{'i'}{'max_key_w'} > $term_w / 3) |
|
275
|
0 |
0 |
if (@color) |
|
285
|
0 |
0 |
if ($self->{'clear_screen'} == 0) { } |
|
|
0 |
0 |
elsif ($self->{'clear_screen'} == 1) { } |
|
291
|
0 |
0 |
if (length $self->{'info'}) { } |
|
293
|
0 |
0 |
if ($^O ne "MSWin32" and $^O ne "cygwin") |
|
298
|
0 |
0 |
if ($self->{'clear_screen'} == 2) { } |
|
314
|
0 |
0 |
if ($self->{'show_context'}) { } |
|
327
|
0 |
0 |
if ($self->{'page'} == 2) { } |
|
343
|
0 |
0 |
if (ref $_[0] eq "Term::Form::ReadLine") |
|
354
|
0 |
0 |
unless defined $prompt |
|
355
|
0 |
0 |
if ref $prompt |
|
356
|
0 |
0 |
unless defined $opt |
|
357
|
0 |
0 |
if (not ref $opt) { } |
|
|
0 |
0 |
elsif (ref $opt ne 'HASH') { } |
|
363
|
0 |
0 |
if (%$opt) |
|
367
|
0 |
0 |
if defined $opt->{$key} |
|
371
|
0 |
0 |
if ($^O eq "MSWin32") |
|
372
|
0 |
0 |
$self->{'codepage_mapping'} ? : |
|
387
|
0 |
0 |
if ($self->{'i'}{'beep'}) |
|
392
|
0 |
0 |
if ($tmp_term_w != $term_w) |
|
397
|
0 |
0 |
if ($self->{'show_context'}) |
|
398
|
0 |
0 |
if ($self->{'i'}{'pre_text_row_count'} + 2 + $self->{'i'}{'post_text_row_count'} >= get_term_height()) |
|
406
|
0 |
0 |
if ($up_before) |
|
410
|
0 |
0 |
if ($self->{'i'}{'prev_context_count'} or $self->{'i'}{'context_count'}) |
|
413
|
0 |
0 |
($self->{'i'}{'prev_context_count'} // 0 > $self->{'i'}{'context_count'}) // 0 ? : |
|
421
|
0 |
0 |
if ($self->{'hide_cursor'}) |
|
424
|
0 |
0 |
if (length $self->{'i'}{'pre_text'}) |
|
429
|
0 |
0 |
if (length $self->{'i'}{'post_text'}) |
|
432
|
0 |
0 |
if ($self->{'i'}{'post_text_row_count'}) |
|
438
|
0 |
0 |
unless (defined $char) |
|
446
|
0 |
0 |
if ($char == -1) { } |
|
|
0 |
0 |
elsif ($char == 9) { } |
|
|
0 |
0 |
elsif ($char == 333 or $char == 16) { } |
|
|
0 |
0 |
elsif ($char == 334 or $char == 14) { } |
|
|
0 |
0 |
elsif ($char == 21) { } |
|
|
0 |
0 |
elsif ($char == 11) { } |
|
|
0 |
0 |
elsif ($char == 339 or $char == 6) { } |
|
|
0 |
0 |
elsif ($char == 337 or $char == 2) { } |
|
|
0 |
0 |
elsif ($char == 335 or $char == 5) { } |
|
|
0 |
0 |
elsif ($char == 336 or $char == 1) { } |
|
|
0 |
0 |
elsif ($char == 127 or $char == 8) { } |
|
|
0 |
0 |
elsif ($char == 346 or $char == 4) { } |
|
|
0 |
0 |
elsif ($char == 338 or $char == 19) { } |
|
|
0 |
0 |
elsif ($char == 340 or $char == 20) { } |
|
|
0 |
0 |
elsif ($char == 24) { } |
|
|
0 |
0 |
elsif ($char == 345) { } |
|
|
0 |
0 |
elsif ($char == 10 or $char == 13) { } |
|
448
|
0 |
0 |
if $m->{'pos'} == 0 |
|
449
|
0 |
0 |
if $m->{'pos'} == @{$m->{'str'};} |
|
461
|
0 |
0 |
if (@{$m->{'str'};}) { } |