| 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) |