[libtest-bdd-cucumber-perl] 03/09: Adding missing POD to I18n.pm

[Intrigeri]

This is an automated email from the git hooks/post-receive script.

intrigeri pushed a commit to annotated tag 0.24
in repository libtest-bdd-cucumber-perl.

commit dc026ea62c4cb1378ca0b467d6363080664cd3f4
Author: Paul Cochrane <paul at liekut.de>
Date:   Thu Jun 5 14:28:44 2014 +0200

    Adding missing POD to I18n.pm
    
    Test::Pod::Coverage noticed a few undocumented methods; this change adds the
    required text.  I tried to copy the existing POD documentation style as much
    as possible, however if something needs correcting, I can update this commit
    accordingly.
---
 lib/Test/BDD/Cucumber/I18n.pm | 34 ++++++++++++++++++++++++++++++++++
 1 file changed, 34 insertions(+)

diff --git a/lib/Test/BDD/Cucumber/I18n.pm b/lib/Test/BDD/Cucumber/I18n.pm
index bd144ee..e8f6009 100644
--- a/lib/Test/BDD/Cucumber/I18n.pm
+++ b/lib/Test/BDD/Cucumber/I18n.pm
@@ -70,15 +70,37 @@ sub _initialize_language_definitions_from_shared_json_file {
     return $langdefs;
 }
 
+=head1 METHODS
+
+=head2 languages
+
+Get codes of supported languages.
+
+=cut
+
 sub languages {
     return keys %$langdefs;
 }
 
+=head2 has_language($language)
+
+Check if a language is supported.  Takes as argument the language
+abbreviation defined in C<share/i18n.json>.
+
+=cut
+
 sub has_language {
     my ($language) = @_;
     exists $langdefs->{$language};
 }
 
+=head2 langdef($language)
+
+Get definition of a language.  Takes as argument the language abbreviation
+defined in C<share/i18n.json>.
+
+=cut
+
 sub langdef {
     my ($language) = @_;
 
@@ -86,6 +108,12 @@ sub langdef {
     return $langdefs->{$language};
 }
 
+=head2 readable_keywords($string, $transform)
+
+Get readable keyword definitions.
+
+=cut
+
 sub readable_keywords {
     my ( $string, $transform ) = @_;
 
@@ -96,6 +124,12 @@ sub readable_keywords {
     return join( ', ', map { '"' . $_ . '"' } @keywords );
 }
 
+=head2 keyword_to_subname
+
+Return a keyword into a subname with non-word characters removed.
+
+=cut
+
 sub keyword_to_subname {
     my ($word) = @_;
 

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libtest-bdd-cucumber-perl.git