Branch Coverage

blib/lib/Test/Without/Gtk2Things.pm
Criterion Covered Total %
branch 3 90 3.3


line true false branch
43 1 1 if ($thing eq '-verbose' or $thing eq 'verbose') { }
1 0 elsif ($thing eq 'all') { }
54 0 0 unless ($class->can($method))
61 0 0 if ($VERBOSE)
62 0 0 $count == 1 ? :
101 0 0 if ($VERBOSE)
111 0 0 if ($package eq 'Gtk2::Gdk::CursorType')
121 0 0 if ($cursor_type eq 'blank-cursor')
135 0 0 if ($VERBOSE)
144 0 0 if ($VERBOSE)
152 0 0 if (eval { do { 'Gtk2::CheckMenuItem'->Glib::Object::new('draw_as_radio', 1) } })
155 0 0 if ('Gtk2::CheckMenuItem'->find_property('draw_as_radio'))
159 0 0 if (eval { do { $action->get_draw_as_radio } })
167 0 0 if ($VERBOSE)
177 0 0 if (eval { do { $store->insert_with_values(0, 0, 'foo'); 1 } })
183 0 0 if (eval { do { $store->insert_with_values(undef, 0, 0, 'foo'); 1 } })
191 0 0 if ($VERBOSE)
198 0 0 if (eval { do { 'Gtk2::MenuItem'->Glib::Object::new('label', 'hello') } })
201 0 0 if (eval { do { 'Gtk2::MenuItem'->Glib::Object::new('use-underline', 1) } })
204 0 0 if ('Gtk2::MenuItem'->can('get_label'))
212 0 0 if ($VERBOSE)
219 0 0 if ('Gtk2::Gdk::Display'->can('get_default'))
220 0 0 if (my $display = 'Gtk2::Gdk::Display'->get_default)
221 0 0 if (my $coderef = $display->can('warp_pointer'))
230 0 0 if ($VERBOSE)
244 0 0 if ($VERBOSE)
309 0 0 if (my $coderef = 'Gtk2::Gdk::Display'->can('get_default'))
312 0 0 if (my $coderef = 'Gtk2::Gdk::Screen'->can('get_display'))
319 0 0 if ($VERBOSE)
340 0 0 if (exists $without{$type})
371 0 0 if (my $coderef = $class->can($method))
393 0 0 if ($class->isa($without_class))
403 0 0 if ($class->isa($without_class) and _pnames_match($pname, \%without_pnames))
414 0 0 if ($_[0]->isa($without_class))
417 0 0 if (_pnames_match($pname, \%without_pnames))
432 0 0 if ($_[0]->isa($without_class))
435 0 0 if (_pnames_match($pname, \%without_pnames))
451 0 0 if (my $pspec = $without_class->find_property($without_pname))
454 0 0 if (my(@pspecs) = grep({$_->get_name eq $without_pname;} $without_class->list_properties))
482 0 0 if ($list_class->isa($without_class))
492 0 0 if ($class->isa($without_class) and _pnames_match($signame, \%without_signames))
510 0 0 if ($obj->isa($without_class))
511 0 0 if (_pnames_match($signame, \%without_signames))
526 0 0 if (my $siginfo = $without_class->signal_query($without_signame))
529 0 0 if (my(@siginfos) = grep({$$_{'signal_name'} eq $without_signame;} 'Glib::Type'->list_signals($without_class)))