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

<http://perl5.git.perl.org/perl.git/commitdiff/e67bc19562c85b51b0d54a3997beeb3ceee2447a?hp=27cdc72ee6ec3061d775f2ff7739a3b826d811a1>

- Log -----------------------------------------------------------------
commit e67bc19562c85b51b0d54a3997beeb3ceee2447a
Author: Karl Williamson <khw@cpan.org>
Date: Wed May 25 19:23:57 2016 -0600

     ext/VMS-DCLsym/DCLsym.pm: Fix missing pod reference

     This looks like it was meant to point to a later heading or item in the
     document, but which was removed at some point, with the reference left
     dangling. I confirmed with Craig Berry that what it is referring to is
     the text in the next paragraph.

M ext/VMS-DCLsym/DCLsym.pm
M t/porting/known_pod_issues.dat

commit c389e68f6ee2168540f4380398361c24e9b985aa
Author: Karl Williamson <khw@cpan.org>
Date: Tue May 24 22:14:59 2016 -0600

     Devel::Peek: Fix a couple of pod glitches

M ext/Devel-Peek/Peek.pm
M t/porting/known_pod_issues.dat

commit 2c0879e73edf569030da235e2a6aa0d8fe1fa1a9
Author: Karl Williamson <khw@cpan.org>
Date: Tue May 24 19:35:17 2016 -0600

     porting/dual-life.t: Clarify test messages

     This changes the message output by the ok() sub to show precisely what
     is being tested

M t/porting/dual-life.t
-----------------------------------------------------------------------

Summary of changes:
  ext/Devel-Peek/Peek.pm | 8 +++++---
  ext/VMS-DCLsym/DCLsym.pm | 6 +++---
  t/porting/dual-life.t | 6 ++++--
  t/porting/known_pod_issues.dat | 2 --
  4 files changed, 12 insertions(+), 10 deletions(-)

diff --git a/ext/Devel-Peek/Peek.pm b/ext/Devel-Peek/Peek.pm
index c0483ca..2c57cba 100644
--- a/ext/Devel-Peek/Peek.pm
+++ b/ext/Devel-Peek/Peek.pm
@@ -3,7 +3,7 @@

  package Devel::Peek;

-$VERSION = '1.23';
+$VERSION = '1.24';
  $XS_VERSION = $VERSION;
  $VERSION = eval $VERSION;

@@ -133,7 +133,9 @@ means no limit.

  If C<use Devel::Peek> directive has a C<:opd=FLAGS> argument,
  this switches on debugging of opcode dispatch. C<FLAGS> should be a
-combination of C<s>, C<t>, and C<P> (see B<-D> flags in L<perlrun>).
+combination of C<s>, C<t>, and C<P> (see
+L<< B<-D> flags in perlrun|perlrun/B<-D>I<letters> >>).
+
  C<:opd> is a shortcut for C<:opd=st>.

  =head2 Runtime debugging
@@ -548,7 +550,7 @@ inside a 5th eval in the program;

  =item *

-it is not currently executed (see C<DEPTH>);
+it is not currently executed (because C<DEPTH> is 0);

  =item *

diff --git a/ext/VMS-DCLsym/DCLsym.pm b/ext/VMS-DCLsym/DCLsym.pm
index b8c9c1b..b239e15 100644
--- a/ext/VMS-DCLsym/DCLsym.pm
+++ b/ext/VMS-DCLsym/DCLsym.pm
@@ -7,7 +7,7 @@ use strict;

  # Package globals
  @ISA = ( 'DynaLoader' );
-$VERSION = '1.06';
+$VERSION = '1.07';
  my(%Locsyms) = ( ':ID' => 'LOCAL' );
  my(%Gblsyms) = ( ':ID' => 'GLOBAL');
  my $DoCache = 1;
@@ -186,8 +186,8 @@ defines a new symbol (or overwrites the old value of an existing symbol), and
  deleting an element deletes the corresponding symbol. Setting an element to
  C<undef>, or C<undef>ing it directly, sets the corresponding symbol to the null
  string. You may also read the special keys ':GLOBAL' and ':LOCAL' to find out
-whether a default symbol table has been specified for this hash (see C<table>
-below), or set either or these keys to specify a default symbol table.
+whether a default symbol table has been specified for this hash (see the next
+paragraph), or set either or these keys to specify a default symbol table.

  When you call the C<tie> function to bind an associative array to this package,
  you may specify as an optional argument the symbol table in which you wish to
diff --git a/t/porting/dual-life.t b/t/porting/dual-life.t
index d7d62d7..4ad2256 100644
--- a/t/porting/dual-life.t
+++ b/t/porting/dual-life.t
@@ -66,9 +66,11 @@ for my $f ( @programs ) {
    next if $f =~ $not_installed;
    my $bn = basename($f);
    if(grep { /\A(?i:$bn)\z/ } keys %dist_dir_exe) {
- ok( -f "$dist_dir_exe{lc $bn}$ext", $f);
+ my $exe_file = "$dist_dir_exe{lc $bn}$ext";
+ ok( -f $exe_file, "Verify -f '$exe_file'");
    } else {
- ok( -f catfile('..', 'utils', "$bn$ext"), $f );
+ my $utils_file = catfile('..', 'utils', "$bn$ext");
+ ok( -f $utils_file, "Verify -f '$utils_file'" );
    }
  }

diff --git a/t/porting/known_pod_issues.dat b/t/porting/known_pod_issues.dat
index 4f1379b..e22d4bc 100644
--- a/t/porting/known_pod_issues.dat
+++ b/t/porting/known_pod_issues.dat
@@ -317,13 +317,11 @@ YAML::Syck
  YAML::Tiny
  dist/data-dumper/dumper.pm ? Should you be using L<...> instead of 1
  ext/amiga-exec/exec.pm Verbatim line length including indents exceeds 79 by 1
-ext/devel-peek/peek.pm ? Should you be using L<...> instead of 2
  ext/dynaloader/dynaloader.pm Verbatim line length including indents exceeds 79 by 1
  ext/hash-util/lib/hash/util.pm Verbatim line length including indents exceeds 79 by 2
  ext/pod-html/testdir/perlpodspec-copy.pod Verbatim line length including indents exceeds 79 by 2
  ext/pod-html/testdir/perlvar-copy.pod ? Should you be using L<...> instead of 3
  ext/pod-html/testdir/perlvar-copy.pod Verbatim line length including indents exceeds 79 by 6
-ext/vms-dclsym/dclsym.pm ? Should you be using L<...> instead of 1
  ext/vms-filespec/lib/vms/filespec.pm Verbatim line length including indents exceeds 79 by 1
  install ? Should you be using F<...> or maybe L<...> instead of 1
  pod/perl.pod Verbatim line length including indents exceeds 79 by 8

--
Perl5 Master Repository

Search Discussions

Related Discussions

Discussion Navigation
viewthread | post
Discussion Overview
groupperl5-changes @
categoriesperl
postedMay 26, '16 at 2:21a
activeMay 26, '16 at 2:21a
posts1
users1
websiteperl.org

1 user in discussion

Karl Williamson: 1 post

People

Translate

site design / logo © 2018 Grokbase