File Coverage

blib/lib/Chart/Plotly/Trace/Scatter/Selected/Textfont.pm
Criterion Covered Total %
statement 9 25 36.0
branch 0 8 0.0
condition 0 8 0.0
subroutine 3 4 75.0
pod 1 1 100.0
total 13 46 28.2


line stmt bran cond sub pod time code
1             use Moose;
2 4     4   28 use MooseX::ExtraArgs;
  4         7  
  4         245  
3 4     4   22934 use Moose::Util::TypeConstraints qw(enum union);
  4         11  
  4         30  
4 4     4   7554 if ( !defined Moose::Util::TypeConstraints::find_type_constraint('PDL') ) {
  4         12  
  4         415  
5             Moose::Util::TypeConstraints::type('PDL');
6             }
7              
8             our $VERSION = '0.042'; # VERSION
9              
10             # ABSTRACT: This attribute is one of the possible options for the trace scatter.
11              
12             my $self = shift;
13             my $extra_args = $self->extra_args // {};
14 0     0 1   my $meta = $self->meta;
15 0   0       my %hash = %$self;
16 0           for my $name ( sort keys %hash ) {
17 0           my $attr = $meta->get_attribute($name);
18 0           if ( defined $attr ) {
19 0           my $value = $hash{$name};
20 0 0         my $type = $attr->type_constraint;
21 0           if ( $type && $type->equals('Bool') ) {
22 0           $hash{$name} = $value ? \1 : \0;
23 0 0 0       }
24 0 0         }
25             }
26             %hash = ( %hash, %$extra_args );
27             delete $hash{'extra_args'};
28 0           if ( $self->can('type') && ( !defined $hash{'type'} ) ) {
29 0           $hash{type} = $self->type();
30 0 0 0       }
31 0           return \%hash;
32             }
33 0            
34             has color => ( is => "rw",
35             isa => "Str",
36             documentation => "Sets the text font color of selected points.",
37             );
38              
39             __PACKAGE__->meta->make_immutable();
40             1;
41              
42              
43             =pod
44              
45             =encoding utf-8
46              
47             =head1 NAME
48              
49             Chart::Plotly::Trace::Scatter::Selected::Textfont - This attribute is one of the possible options for the trace scatter.
50              
51             =head1 VERSION
52              
53             version 0.042
54              
55             =head1 SYNOPSIS
56              
57             use HTML::Show;
58             use Chart::Plotly;
59             use Chart::Plotly::Trace::Scatter;
60             my $scatter = Chart::Plotly::Trace::Scatter->new( x => [ 1 .. 5 ], y => [ 1 .. 5 ] );
61            
62             HTML::Show::show( Chart::Plotly::render_full_html( data => [$scatter] ) );
63              
64             =head1 DESCRIPTION
65              
66             This attribute is part of the possible options for the trace scatter.
67              
68             This file has been autogenerated from the official plotly.js source.
69              
70             If you like Plotly, please support them: L<https://plot.ly/>
71             Open source announcement: L<https://plot.ly/javascript/open-source-announcement/>
72              
73             Full reference: L<https://plot.ly/javascript/reference/#scatter>
74              
75             =head1 DISCLAIMER
76              
77             This is an unofficial Plotly Perl module. Currently I'm not affiliated in any way with Plotly.
78             But I think plotly.js is a great library and I want to use it with perl.
79              
80             =head1 METHODS
81              
82             =head2 TO_JSON
83              
84             Serialize the trace to JSON. This method should be called only by L<JSON> serializer.
85              
86             =head1 ATTRIBUTES
87              
88             =over
89              
90             =item * color
91              
92             Sets the text font color of selected points.
93              
94             =back
95              
96             =head1 AUTHOR
97              
98             Pablo Rodríguez González <pablo.rodriguez.gonzalez@gmail.com>
99              
100             =head1 COPYRIGHT AND LICENSE
101              
102             This software is Copyright (c) 2022 by Pablo Rodríguez González.
103              
104             This is free software, licensed under:
105              
106             The MIT (X11) License
107              
108             =cut