Commits

Shlomi Fish committed 70be1c3

Fix a warning with perl-5.17.1.

  • Participants
  • Parent commits 716e4ff
  • Tags releases/0.0125

Comments (0)

Files changed (6)

modules/Test-Run/Changes

+0.0125    Wed Jul  4 16:06:35 IDT 2012
+    * Fix the perl-5.17.1 warning for good by changing delimiter to s
+    with / \{ .. \} / ... /.
+
 0.0124    Thu Jun  7 13:05:45 IDT 2012
     * Fix a warning with perl-5.17.0 about unescaped { and }.
 

modules/Test-Run/lib/Test/Run/Core.pm

 
 =head1 VERSION
 
-Version 0.0124
+Version 0.0125
 
 =cut
 
-$VERSION = '0.0124';
+$VERSION = '0.0125';
 
 $ENV{HARNESS_ACTIVE} = 1;
 $ENV{HARNESS_NG_VERSION} = $VERSION;

modules/Test-Run/lib/Test/Run/Obj.pm

 
 =head1 VERSION
 
-Version 0.0124
+Version 0.0125
 
 =cut
 
-$VERSION = "0.0124";
+$VERSION = "0.0125";
 
 @ISA = (qw(
     Test::Run::Plugin::CmdLine::Output

modules/Test-Run/lib/Test/Run/Obj/IntOrUnknown/Moose.pm

 
 =head1 VERSION
 
-Version 0.0124
+Version 0.0125
 
 =head1 DESCRIPTION
 
 
 use vars qw($VERSION);
 
-$VERSION = '0.0124';
+$VERSION = '0.0125';
 
 Moose::Exporter->setup_import_methods(
       with_caller => [ 'has_IntOrUnknown' ],

modules/Test-Run/lib/Test/Run/Plugin/CmdLine/Output.pm

 sub _namelenize_string
 {
     my ($self, $string) = @_;
-    
-    $string =~ s{\$\{max_namelen\}}{$self->max_namelen()}ge;
+
+    $string =~ s/\$\{max_namelen\}/$self->max_namelen()/ge;
 
     return $string;
 }

modules/Test-Run/lib/Test/Run/Straps.pm

 use warnings;
 
 use vars qw($VERSION);
-$VERSION = '0.0124';
+$VERSION = '0.0125';
 
 =head1 NAME