FAQ
In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/e9baa58dcb4000655dff6e7f49c2d012acc17a39?hp=c29dfc6a6c45f86648c51f961304254cc3c449b9>

- Log -----------------------------------------------------------------
commit e9baa58dcb4000655dff6e7f49c2d012acc17a39
Author: Karl Williamson <khw@cpan.org>
Date: Wed May 25 10:40:51 2016 -0600

     podcheck.t: Move a declaration

     This just moves a variable declaration and initialization to elsewhere
     in the file where it can be used in a different place in a future
     commit. And it is now placed where it is more visible, as it really is
     a program-level definition.

     The code is outdented as well, and the comment unwrapped to be on a
     single line, but no other changes were made.
-----------------------------------------------------------------------

Summary of changes:
  t/porting/podcheck.t | 33 ++++++++++++++++-----------------
  1 file changed, 16 insertions(+), 17 deletions(-)

diff --git a/t/porting/podcheck.t b/t/porting/podcheck.t
index 8b049e4..cefe58f 100644
--- a/t/porting/podcheck.t
+++ b/t/porting/podcheck.t
@@ -439,6 +439,22 @@ my $non_pods = qr/ (?: \.
^(?i:Makefile\.PL)$
                  /x;

+# Matches something that looks like a file name, but is enclosed in C<...>
+my $C_path_re = qr{ \b ( C<
+ # exclude various things that have slashes
+ # in them but aren't paths
+ (?!
+ (?: (?: s | qr | m) / ) # regexes
+ | \d+/\d+> # probable fractions
+ | OS/2>
+ | Perl/Tk>
+ | origin/blead>
+ | origin/maint
+ | - # File names don't begin with "-"
+ )
+ [-\w]+ (?: / [-\w]+ )+ (?: \. \w+ )? > )
+ }x;
+
  # '.PL' files should be excluded, as they aren't final pods, but often contain
  # material used in generating pods, and so can look like a pod. We can't use
  # the regexp above because case sensisitivity is important for these, as some
@@ -857,23 +873,6 @@ package My::Pod::Checker { # Extend Pod::Checker
          }
          $paragraph = join " ", split /^/, $paragraph;

- # Matches something that looks like a file name, but is enclosed in
- # C<...>
- my $C_path_re = qr{ \b ( C<
- # exclude various things that have slashes
- # in them but aren't paths
- (?!
- (?: (?: s | qr | m) / ) # regexes
- | \d+/\d+> # probable fractions
- | OS/2>
- | Perl/Tk>
- | origin/blead>
- | origin/maint
- | - # File names don't begin with "-"
- )
- [-\w]+ (?: / [-\w]+ )+ (?: \. \w+ )? > )
- }x;
-
          # If looks like a reference to other documentation by containing the
          # word 'See' and then a likely pod directive, warn.
          while ($paragraph =~ m{

--
Perl5 Master Repository

Search Discussions

Related Discussions

Discussion Navigation
viewthread | post
Discussion Overview
groupperl5-changes @
categoriesperl
postedMay 27, '16 at 5:07p
activeMay 27, '16 at 5:07p
posts1
users1
websiteperl.org

1 user in discussion

Karl Williamson: 1 post

People

Translate

site design / logo © 2018 Grokbase