Changeset 9832
- Timestamp:
- 04/19/08 05:03:05 (5 years ago)
- Location:
- lang/perl/Google-Chart/trunk
- Files:
-
- 2 added
- 26 modified
-
.shipit (modified) (1 diff)
-
Changes (modified) (1 diff)
-
Makefile.PL (modified) (1 diff)
-
lib/Google/Chart.pm (modified) (1 diff)
-
lib/Google/Chart/Base.pm (modified) (1 diff)
-
lib/Google/Chart/Color.pm (modified) (1 diff)
-
lib/Google/Chart/Color/Data.pm (modified) (1 diff)
-
lib/Google/Chart/Data.pm (modified) (3 diffs)
-
lib/Google/Chart/Data/ExtendedEncoding.pm (added)
-
lib/Google/Chart/Data/SimpleEncoding.pm (modified) (1 diff)
-
lib/Google/Chart/Factory.pm (modified) (2 diffs)
-
lib/Google/Chart/Size.pm (modified) (1 diff)
-
lib/Google/Chart/Type.pm (modified) (1 diff)
-
lib/Google/Chart/Type/Bar.pm (modified) (1 diff)
-
lib/Google/Chart/Type/Bar/HorizontalGrouped.pm (modified) (1 diff)
-
lib/Google/Chart/Type/Bar/HorizontalStacked.pm (modified) (1 diff)
-
lib/Google/Chart/Type/Bar/VerticalGrouped.pm (modified) (1 diff)
-
lib/Google/Chart/Type/Bar/VerticalStacked.pm (modified) (1 diff)
-
lib/Google/Chart/Type/Line.pm (modified) (1 diff)
-
lib/Google/Chart/Type/Line/LineX.pm (modified) (1 diff)
-
lib/Google/Chart/Type/Line/LineXY.pm (modified) (1 diff)
-
lib/Google/Chart/Type/Pie.pm (modified) (1 diff)
-
lib/Google/Chart/Type/Pie/ThreeDimensional.pm (modified) (1 diff)
-
lib/Google/Chart/Type/Pie/TwoDimensional.pm (modified) (1 diff)
-
lib/Google/Chart/Type/ScatterPlot.pm (modified) (1 diff)
-
lib/Google/Chart/Type/Venn.pm (modified) (1 diff)
-
t/01_basic.t (modified) (5 diffs)
-
t/02_extended_encoding.t (added)
Legend:
- Unmodified
- Added
- Removed
-
lang/perl/Google-Chart/trunk/.shipit
r9720 r9832 1 1 steps = ApplyYAMLChangeLogVersion, Manifest, DistTest, Commit, Tag, MakeDist, MyUploadCPAN, DistClean, Twitter 2 2 3 svk.tagpattern = //local/c pan/tags/Google-Chart-%v3 svk.tagpattern = //local/coderepos/lang/perl/Google-Chart/tags/Google-Chart-%v 4 4 5 5 twitter.config = ~/.twitterrc -
lang/perl/Google-Chart/trunk/Changes
r9720 r9832 3 3 name: Google-Chart 4 4 releases: 5 - author: 'Marcel Gruenauer <marcel@cpan.org>' 6 changes: 7 - set the version to 0.04 8 - '.shipit: fixed svk.tagpattern for CodeRepos' 9 - 'Makefile.PL: requires Test::Differences' 10 - 'Google::Chart::Data: made as_string() more generic' 11 - 'Google::Chart::Data::SimpleEncoding: uses new inherited as_string()' 12 - "Google::Chart::Factory: enabled mapping for 'data_extended_encoding' object type" 13 - 't/01_basic.t: uses Test::Differences' 14 - added lib/Google/Chart/Data/ExtendedEncoding.pm 15 - added t/02_extended_encoding.t 16 date: 2008-04-18T20:00:54Z 17 tags: [] 18 version: 0.04 5 19 - author: 'Marcel Gruenauer <marcel@cpan.org>' 6 20 changes: -
lang/perl/Google-Chart/trunk/Makefile.PL
r9720 r9832 13 13 14 14 build_requires 'Test::More' => '0.70'; 15 build_requires 'Test::Differences'; 15 16 16 17 process_templates( -
lang/perl/Google-Chart/trunk/lib/Google/Chart.pm
r9720 r9832 6 6 7 7 8 our $VERSION = '0.0 3';8 our $VERSION = '0.04'; 9 9 10 10 -
lang/perl/Google-Chart/trunk/lib/Google/Chart/Base.pm
r9720 r9832 5 5 6 6 7 our $VERSION = '0.0 3';7 our $VERSION = '0.04'; 8 8 9 9 -
lang/perl/Google-Chart/trunk/lib/Google/Chart/Color.pm
r9720 r9832 5 5 6 6 7 our $VERSION = '0.0 3';7 our $VERSION = '0.04'; 8 8 9 9 -
lang/perl/Google-Chart/trunk/lib/Google/Chart/Color/Data.pm
r9720 r9832 5 5 6 6 7 our $VERSION = '0.0 3';7 our $VERSION = '0.04'; 8 8 9 9 -
lang/perl/Google-Chart/trunk/lib/Google/Chart/Data.pm
r9720 r9832 5 5 6 6 7 our $VERSION = '0.0 3';7 our $VERSION = '0.04'; 8 8 9 9 … … 17 17 18 18 19 use constant ENCODING_TYPE_VALUE => '?'; # override in subclasses 20 21 19 22 sub has_content { 20 23 my $self = shift; … … 25 28 sub as_string { 26 29 my $self = shift; 27 sprintf 'chd=s:%s', 30 sprintf 'chd=%s:%s', 31 $self->ENCODING_TYPE_VALUE, 28 32 join ',' => 29 33 map { $self->encode_value_set($_) } -
lang/perl/Google-Chart/trunk/lib/Google/Chart/Data/SimpleEncoding.pm
r9720 r9832 3 3 use strict; 4 4 use warnings; 5 use Data::Dumper;6 5 7 6 8 our $VERSION = '0.0 3';7 our $VERSION = '0.04'; 9 8 10 9 11 10 use base qw(Google::Chart::Data); 11 12 13 use constant ENCODING_TYPE_VALUE => 's'; 12 14 13 15 -
lang/perl/Google-Chart/trunk/lib/Google/Chart/Factory.pm
r9720 r9832 5 5 6 6 7 our $VERSION = '0.0 3';7 our $VERSION = '0.04'; 8 8 9 9 … … 17 17 data_simple_encoding => 'Google::Chart::Data::SimpleEncoding', 18 18 # data_text_encoding => 'Google::Chart::Data::TextEncoding', 19 #data_extended_encoding => 'Google::Chart::Data::ExtendedEncoding',19 data_extended_encoding => 'Google::Chart::Data::ExtendedEncoding', 20 20 size => 'Google::Chart::Size', 21 21 type => 'Google::Chart::Type', -
lang/perl/Google-Chart/trunk/lib/Google/Chart/Size.pm
r9720 r9832 5 5 6 6 7 our $VERSION = '0.0 3';7 our $VERSION = '0.04'; 8 8 9 9 -
lang/perl/Google-Chart/trunk/lib/Google/Chart/Type.pm
r9720 r9832 5 5 6 6 7 our $VERSION = '0.0 3';7 our $VERSION = '0.04'; 8 8 9 9 -
lang/perl/Google-Chart/trunk/lib/Google/Chart/Type/Bar.pm
r9720 r9832 5 5 6 6 7 our $VERSION = '0.0 3';7 our $VERSION = '0.04'; 8 8 9 9 -
lang/perl/Google-Chart/trunk/lib/Google/Chart/Type/Bar/HorizontalGrouped.pm
r9720 r9832 5 5 6 6 7 our $VERSION = '0.0 3';7 our $VERSION = '0.04'; 8 8 9 9 -
lang/perl/Google-Chart/trunk/lib/Google/Chart/Type/Bar/HorizontalStacked.pm
r9720 r9832 5 5 6 6 7 our $VERSION = '0.0 3';7 our $VERSION = '0.04'; 8 8 9 9 -
lang/perl/Google-Chart/trunk/lib/Google/Chart/Type/Bar/VerticalGrouped.pm
r9720 r9832 5 5 6 6 7 our $VERSION = '0.0 3';7 our $VERSION = '0.04'; 8 8 9 9 -
lang/perl/Google-Chart/trunk/lib/Google/Chart/Type/Bar/VerticalStacked.pm
r9720 r9832 5 5 6 6 7 our $VERSION = '0.0 3';7 our $VERSION = '0.04'; 8 8 9 9 -
lang/perl/Google-Chart/trunk/lib/Google/Chart/Type/Line.pm
r9720 r9832 5 5 6 6 7 our $VERSION = '0.0 3';7 our $VERSION = '0.04'; 8 8 9 9 -
lang/perl/Google-Chart/trunk/lib/Google/Chart/Type/Line/LineX.pm
r9720 r9832 5 5 6 6 7 our $VERSION = '0.0 3';7 our $VERSION = '0.04'; 8 8 9 9 -
lang/perl/Google-Chart/trunk/lib/Google/Chart/Type/Line/LineXY.pm
r9720 r9832 5 5 6 6 7 our $VERSION = '0.0 3';7 our $VERSION = '0.04'; 8 8 9 9 -
lang/perl/Google-Chart/trunk/lib/Google/Chart/Type/Pie.pm
r9720 r9832 5 5 6 6 7 our $VERSION = '0.0 3';7 our $VERSION = '0.04'; 8 8 9 9 -
lang/perl/Google-Chart/trunk/lib/Google/Chart/Type/Pie/ThreeDimensional.pm
r9720 r9832 5 5 6 6 7 our $VERSION = '0.0 3';7 our $VERSION = '0.04'; 8 8 9 9 -
lang/perl/Google-Chart/trunk/lib/Google/Chart/Type/Pie/TwoDimensional.pm
r9720 r9832 5 5 6 6 7 our $VERSION = '0.0 3';7 our $VERSION = '0.04'; 8 8 9 9 -
lang/perl/Google-Chart/trunk/lib/Google/Chart/Type/ScatterPlot.pm
r9720 r9832 5 5 6 6 7 our $VERSION = '0.0 3';7 our $VERSION = '0.04'; 8 8 9 9 -
lang/perl/Google-Chart/trunk/lib/Google/Chart/Type/Venn.pm
r9720 r9832 5 5 6 6 7 our $VERSION = '0.0 3';7 our $VERSION = '0.04'; 8 8 9 9 -
lang/perl/Google-Chart/trunk/t/01_basic.t
r9720 r9832 5 5 use Google::Chart; 6 6 use Test::More tests => 4; 7 use Test::Differences; 8 7 9 8 10 my $chart = Google::Chart->new( … … 16 18 ); 17 19 18 is(20 eq_or_diff( 19 21 $chart->get_url, 20 22 'http://chart.apis.google.com/chart?chs=300x100&chd=s:AGMSYekqw29&cht=p3', … … 24 26 $chart->type_name('type_line'); 25 27 26 is(28 eq_or_diff( 27 29 $chart->get_url, 28 30 'http://chart.apis.google.com/chart?chs=300x100&chd=s:AGMSYekqw29&cht=lc', … … 32 34 $chart->colors('FF0000'); 33 35 34 is(36 eq_or_diff( 35 37 $chart->get_url, 36 38 'http://chart.apis.google.com/chart?chs=300x100&chd=s:AGMSYekqw29&cht=lc&chco=FF0000', … … 41 43 $chart->color_data->colors_push($c2); 42 44 43 is(45 eq_or_diff( 44 46 $chart->get_url, 45 47 'http://chart.apis.google.com/chart?chs=300x100&chd=s:AGMSYekqw29&cht=lc&chco=FF0000,00FF7F5a',
![(please configure the [header_logo] section in trac.ini)](/share/chrome/site/your_project_logo.png)