blib/lib/X11/Protocol/GrabServer.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 1 | 12 | 8.3 |
line | true | false | branch |
---|---|---|---|
26 | 0 | 1 | unless eval q[use Scalar::Util 'weaken'; 1] or eval qq[\n#line 28 "/.cpan/build/X11-Protocol-Other-29-8DB0ME/blib/lib/X11/Protocol/GrabServer.pm"\nsub weaken {} # otherwise noop\n] |
41 | 0 | 0 | unless (defined $X) |
64 | 0 | 0 | unless ($$self{'grabbed'}) |
67 | 0 | 0 | if (not $$X{'X11::Protocol::GrabServer.count'}++) |
78 | 0 | 0 | if (delete $$self{'grabbed'}) |
80 | 0 | 0 | if (--$$X{'X11::Protocol::GrabServer.count'} <= 0) |