ON
use strictures 1;
use Moo;
use Wight;
use Encode;
use File::Share qw/dist_file/;
use Cwd;
use JSON::XS;
has 'output' => ( is => 'rw', default => sub { 'example.png'} );
has 'rows' => ( is => 'rw'
package Wight::Chart::ChartJS;
use Moo;
use JSON::XS;
use Encode;
use Graphics::Color::RGB;
extends 'Wight::Chart';
our $VERSION = '0.003'; # VERSION
#TODO: import roles for each type for more opti
park => { cls => "Line", config => {
scaleShowLabels => JSON::XS::false,
pointDot => JSON::XS::false,
scaleShowGridLines => JSON::XS::false,
}},
bar => { cls => "Bar" },
radar => { c
_;
my $w = $self->wight;
my $src = $types->{$self->type};
my $config = {
animation => JSON::XS::false,
%{$src->{config} || {} },
%{$local_config || {} },
};
#if type is spark,
CT: Save google charts to images using phantomjs
our $VERSION = '0.003'; # VERSION
use Moo;
use JSON::XS;
use Encode;
extends 'Wight::Chart';
sub src_html { 'google.html' }
#TODO: import roles for
$self->height - $self->border,
},
%{$self->options}
};
my $args = decode_utf8(encode_json({
options => $options,
type => $types->{$self->type},
rows => $self->rows,
column