Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

[GH #851] Add pod_source_files to Parrot::Distribution and t/codingst…

…d/copyright.t

This leads to several errors in the copyright.t tests
  • Loading branch information...
commit 19e22a7e076f1eab38c4763a4f4543517da9acee 1 parent ead66e0
@rurban rurban authored
Showing with 8 additions and 0 deletions.
  1. +7 −0 lib/Parrot/Distribution.pm
  2. +1 −0  t/codingstd/copyright.t
View
7 lib/Parrot/Distribution.pm
@@ -147,6 +147,8 @@ BEGIN {
=item C<pmc_source_file_directories()>
+=item C<pod_source_file_directories()()>
+
=item C<python_source_file_directories()>
=item C<yacc_source_file_directories()>
@@ -167,6 +169,8 @@ Returns the directories which contain source files of the appropriate filetype.
=item C<pmc_source_file_with_name()>
+=item C<pod_source_file_with_name()()>
+
=item C<python_source_file_with_name()>
=item C<yacc_source_file_with_name()>
@@ -187,6 +191,8 @@ Returns the source file with the specified name and of the appropriate filetype.
=item C<pmc_source_files()>
+=item C<pod_source_files()>
+
=item C<python_source_files()>
=item C<yacc_source_files()>
@@ -208,6 +214,7 @@ BEGIN {
except_dirs => [qw{ examples/library }],
},
yacc => { file_exts => ['y'] },
+ pod => { file_exts => ['pod'] },
perl => {
file_exts => [ 'pl', 'pm', 't' ],
shebang => qr/^#!\s*perl/,
View
1  t/codingstd/copyright.t
@@ -42,6 +42,7 @@ my @files = @ARGV ? <@ARGV> : (
$DIST->get_make_language_files(),
$DIST->get_pir_language_files(),
$DIST->get_python_language_files(),
+ $DIST->pod_source_files(),
);
my (
@no_copyright_files,
Please sign in to comment.
Something went wrong with that request. Please try again.