This is an automated email from the git hooks/post-receive script. js pushed a commit to branch master in repository libcatmandu-perl.
commit 5a28293adef347d580530f9617d4221def02f2fb Author: Patrick Hochstenbach <patrick.hochstenb...@ugent.be> Date: Fri Dec 11 14:27:26 2015 +0100 Adding test for start and limit --- t/Catmandu-Cmd-convert.t | 7 +++++-- t/planets.csv | 2 +- 2 files changed, 6 insertions(+), 3 deletions(-) diff --git a/t/Catmandu-Cmd-convert.t b/t/Catmandu-Cmd-convert.t index 31d3c8c..ef4c44b 100644 --- a/t/Catmandu-Cmd-convert.t +++ b/t/Catmandu-Cmd-convert.t @@ -16,7 +16,7 @@ require_ok $pkg; use Catmandu::CLI; -my $result = test_app(qq|Catmandu::CLI| => [ qw(convert YAML --file t/catmandu.yml to JSON) ]); +my $result = test_app(qq|Catmandu::CLI| => [ qw(convert -v YAML --file t/catmandu.yml to JSON) ]); my $perl = decode_json($result->stdout); @@ -26,4 +26,7 @@ is $result->error, undef, 'threw no exceptions' ; # Next test can fail on buggy Perl installations ##is $result->stderr, '', 'nothing sent to sderr' ; -done_testing 5; +$result = test_app(qq|Catmandu::CLI| => [ qw(convert -v --start=2 --total=1 CSV --file t/planets.csv to CSV --header 0 --fields english,latin) ]); +is $result->stdout, "Moon,Luna\n", 'start and limit' ; + +done_testing 6; diff --git a/t/planets.csv b/t/planets.csv index ddeafb8..e69e624 100644 --- a/t/planets.csv +++ b/t/planets.csv @@ -1,4 +1,4 @@ -english, latin +english,latin Sun,Sol Mercury,Mercurius Moon,Luna -- Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libcatmandu-perl.git _______________________________________________ Pkg-perl-cvs-commits mailing list Pkg-perl-cvs-commits@lists.alioth.debian.org http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits