Branch Coverage

blib/lib/Term/ReadLine/Zoid/ViCommand.pm
Criterion Covered Total %
branch 53 80 66.2


line true false branch
15 13 0 $_[0]->can($sub) ? :
66 0 31 if $$self{'_vi_mini_b'}
69 7 24 unless $_[1] or $$self{'pos'}[0] == 0
97 0 95 if (length $key > 1) { }
103 0 95 if ($$self{'vi_command'} =~ m[^[/\?\:]]) { }
81 14 elsif ($$self{'vi_command'} =~ /^0|^(\d*)(\D)/) { }
111 81 0 if ($self->can($sub)) { }
115 38 43 unless lc $cmd eq 'u' or join("\n", @{$$s{'lines'};}) eq join("\n", @{$$self{'lines'};})
119 33 48 if $$self{'vi_command'} and not grep({$_ eq $cmd;} @vi_motions, '.')
125 14 0 if $$self{'vi_command'} =~ /^\d+$/
177 0 0 if $_[1] eq 'I'
182 0 0 $_[1] eq 'A' ? :
199 0 0 if ($_[1] eq 'M') { }
216 2 0 if $_[0] eq 'r'
230 0 4 if $chr eq 'escape'
231 0 4 if length $chr > 1
240 0 22 if $key eq 'escape'
242 0 22 unless grep {$_ eq $key;} @vi_motions, $ignore, ('left', 'right', 'up', 'down', 'home', 'end')
246 21 1 unless ($key eq $ignore)
248 3 18 grep({$_ eq $key;} '0', '^', '$') ? :
250 0 21 unless $re
251 2 19 if lc $key eq 'e' and $$self{'pos'}[0] < length $$self{'lines'}[$$self{'pos'}[1]]
333 0 2 unless $n =~ /^\w$/
334 0 2 unless exists $$self{'config'}{'aliases'}{'_' . $n}
351 8 4 $2 ? :
365 2 1 unless $$self{'vi_command'} =~ /^$cnt/
366 0 3 unless length $$self{'vi_last_cmd'}
369 0 3 if $2 eq '.'
370 1 2 defined $cnt ? :
420 1 1 $key eq 'W' ? :
423 0 2 if ($l =~ /^.{$$self{'pos'}[0]}(.+?)(?
442 1 1 $key eq 'E' ? :
445 2 0 if ($l =~ /^.{$$self{'pos'}[0]}($w?.*?$w+)/) { }
464 1 1 $key eq 'B' ? :
468 2 0 if ($l =~ /($w+[^$w]*)$/) { }
633 1 2 $cnt == 1 && !($$self{'vi_command'} =~ /^1/) ? :
634 0 3 unless @{$$self{'history'};}
683 1 22 if ($key eq 'D') { }
684 0 22 unless $self->_do_motion('d', $cnt)
685 1 22 if ($$self{'vi_command'} =~ /dd$/) { }