Branch Coverage

lib/Kephra/Menu.pm
Criterion Covered Total %
branch 0 114 0.0


line true false branch
10 0 0 if (is($_[1])) { }
0 0 elsif (exists $menu{$_[0]}{'ref'}) { }
13 0 0 if stored($_[0])
14 0 0 if ref $_[0] eq 'Wx::Menu'
15 0 0 if ref $menu{$_[0]} eq 'HASH'
19 0 0 if ref $_[1] eq 'CODE'
21 0 0 if stored($_[0])
28 0 0 if exists $menu{$_[0]}{'onopen'}{$_[1]}
34 0 0 if (stored($id))
36 0 0 if ($$menu{'absolete'} and $$menu{'update'})
37 0 0 if $$menu{'update'}()
38 0 0 if (ref $$menu{'onopen'} eq 'HASH')
48 0 0 if ($menu_name eq '&insert_templates') { }
0 0 elsif ($menu_name eq '&file_history') { }
0 0 elsif ($menu_name eq '&document_change') { }
56 0 0 if (exists $$tmp{'template'})
88 0 0 if (ref $history eq 'ARRAY')
101 0 0 Kephra::File::History::had_init() ? :
107 0 0 if Kephra::File::History::update()
114 0 0 unless exists $Kephra::temp{'document'}{'buffer'}
122 0 0 if $nr == 9
124 0 0 $$filenames[$nr] ? :
145 0 0 unless ref $menu_def eq 'ARRAY'
177 0 0 unless ref $menu_def eq 'ARRAY'
185 0 0 if (not defined $item_def) { }
0 0 elsif (substr($item_def, -1) eq '#') { }
0 0 elsif ($item_def eq '' or $item_def eq 'separator') { }
0 0 elsif (ref $item_def eq 'HASH') { }
198 0 0 if ($pos == -1) { }
208 0 0 if ($item{'type'} eq 'menu')
213 0 0 if $id_parts[2]
219 0 0 if $pos == -1
222 0 0 if ($item{'type'} eq 'menu') { }
228 0 0 unless ref $cmd_data and exists $$cmd_data{'call'}
230 0 0 if $$cmd_data{$_}
232 0 0 if $$cmd_data{'key'}
242 0 0 unless defined $menu_id
245 0 0 if (defined $menu and $menu) { }
249 0 0 unless (ref $menu_data eq 'ARRAY')
256 0 0 defined $menu{$menu_id}{'item_id'} ? :
262 0 0 if (not $$item_data{'type'} or $$item_data{'type'} eq 'separator') { }
0 0 elsif ($$item_data{'type'} eq 'menu') { }
266 0 0 ref $$item_data{'data'} eq 'ARRAY' ? :
269 0 0 unless defined $$item_data{'help'}
273 0 0 if is($submenu)
275 0 0 if (defined $$item_data{'icon'})
278 0 0 if ref $bmp eq 'Wx::Bitmap' and not Wx::wxMAC()
287 0 0 if ($$item_data{'type'} eq 'checkitem') { }
0 0 elsif ($$item_data{'type'} eq 'radioitem') { }
0 0 elsif ($$item_data{'type'} eq 'item') { }
294 0 0 if ($$item_data{'type'} eq 'item')
295 0 0 if (ref $$item_data{'icon'} eq 'Wx::Bitmap') { }
296 0 0 unless Wx::wxMAC()
306 0 0 if ref $$item_data{'enable'} eq 'CODE'
309 0 0 if ref $$item_data{'state'} eq 'CODE'
314 0 0 if $$item_data{'help'}
329 0 0 unless $menu