This is an automated email from the git hooks/post-receive script. intrigeri pushed a commit to annotated tag 0.19 in repository libtest-bdd-cucumber-perl.
commit b4d347cbac6d57eab7a2bb33c3a27b55c8049928 Author: glauschwuffel <glauschwuf...@nomaden.org> Date: Sun May 18 16:02:30 2014 +0200 Fixed typo in doc. Removed passing of language argument since we now get the language from a feature --- lib/App/pherkin.pm | 2 +- lib/Test/BDD/Cucumber/Parser.pm | 15 +++++++-------- 2 files changed, 8 insertions(+), 9 deletions(-) diff --git a/lib/App/pherkin.pm b/lib/App/pherkin.pm index 151a46a..3f2b56e 100644 --- a/lib/App/pherkin.pm +++ b/lib/App/pherkin.pm @@ -51,7 +51,7 @@ sub run { my ($options, @feature_files) = $self->_process_arguments(@arguments); my ( $executor, @features ) = Test::BDD::Cucumber::Loader->load( - $feature_files[0] || './features/', $self->tag_scheme, $arguments[1] + $feature_files[0] || './features/', $self->tag_scheme ); die "No feature files found" unless @features; diff --git a/lib/Test/BDD/Cucumber/Parser.pm b/lib/Test/BDD/Cucumber/Parser.pm index 80bd05b..3726490 100644 --- a/lib/Test/BDD/Cucumber/Parser.pm +++ b/lib/Test/BDD/Cucumber/Parser.pm @@ -44,24 +44,23 @@ use Test::BDD::Cucumber::Model::TagSpec; my $LANGUAGES = decode_json( read_file( "./lib/Test/BDD/Cucumber/i18n.json", { binmode => ':raw' } ) ); sub parse_string { - my ( $class, $string, $tag_scheme, $language ) = @_; - $language = 'en' unless($language); + my ( $class, $string, $tag_scheme ) = @_; + return $class->_construct( Test::BDD::Cucumber::Model::Document->new({ content => $string - }), $tag_scheme, $language ); + }), $tag_scheme ); } sub parse_file { - my ( $self, $string, $tag_scheme, $language ) = @_; - $language = 'en' unless($language); + my ( $self, $string, $tag_scheme) = @_; return $self->_construct( Test::BDD::Cucumber::Model::Document->new({ content => scalar( read_file( $string, { binmode => ':utf8' } ) ), filename => $string - }), $tag_scheme, $language ); + }), $tag_scheme ); } sub _construct { - my ( $class, $document, $tag_scheme, $language ) = @_; + my ( $class, $document, $tag_scheme ) = @_; my $feature = Test::BDD::Cucumber::Model::Feature->new({ document => $document }); my @lines = $class->_remove_next_blanks( @{ $document->lines } ); @@ -324,7 +323,7 @@ sub _pipe_array { =head1 ERROR HANDLING -L<Test::BDD::Cucumber> uses L<Ouch> for exception handling. Error originating in this +L<Test::BDD::Cucumber> uses L<Ouch> for exception handling. Errors originating in this class tend to have a code of C<parse_error> and a L<Test::BDD::Cucumber::Model::Line> object for data. -- Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libtest-bdd-cucumber-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