File Coverage

blib/lib/MoobX/Attributes.pm
Criterion Covered Total %
statement 26 26 100.0
branch n/a
condition n/a
subroutine 10 10 100.0
pod 0 3 0.0
total 36 39 92.3


line stmt bran cond sub pod time code
1             our $AUTHORITY = 'cpan:YANICK';
2             #ABSTRACT: Attributes to annotate variables as MoobX observables
3             $MoobX::Attributes::VERSION = '0.1.2';
4              
5              
6             use 5.20.0;
7 8     8   4280  
  8         26  
8             use MoobX '!:attributes';
9 8     8   43  
  8         16  
  8         59  
10             use Attribute::Handlers;
11 8     8   5822  
  8         36324  
  8         43  
12             no warnings 'redefine';
13 8     8   287  
  8         16  
  8         473  
14             my ($package, $symbol, $referent, $attr, $data) = @_;
15              
16 4     4 0 18514 MoobX::observable_ref($referent);
17             }
18 4         50  
19 8     8   43 my ($package, $symbol, $referent, $attr, $data) = @_;
  8         19  
  8         33  
20              
21             MoobX::observable_ref($referent);
22 1     1 0 3960 }
23              
24 1         9 my ($package, $symbol, $referent, $attr, $data) = @_;
25 8     8   2221  
  8         15  
  8         32  
26             MoobX::observable_ref($referent);
27             }
28 1     1 0 4352  
29             1;
30 1         11  
31 8     8   2012  
  8         24  
  8         30  
32             =pod
33              
34             =encoding UTF-8
35              
36             =head1 NAME
37              
38             MoobX::Attributes - Attributes to annotate variables as MoobX observables
39              
40             =head1 VERSION
41              
42             version 0.1.2
43              
44             =head1 SYNOPSIS
45              
46             use MoobX;
47              
48             my $foo :Observable;
49              
50             =head1 DESCRIPTION
51              
52             Used internally by L<MoobX>.
53              
54             =head1 AUTHOR
55              
56             Yanick Champoux <yanick@cpan.org>
57              
58             =head1 COPYRIGHT AND LICENSE
59              
60             This software is copyright (c) 2022, 2017 by Yanick Champoux.
61              
62             This is free software; you can redistribute it and/or modify it under
63             the same terms as the Perl 5 programming language system itself.
64              
65             =cut