proposed new release

diff --git a/Changes b/Changes
index 2ca9417..84b1f8d 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,5 +1,11 @@
 # This file documents the revision history for Perl extension Catalyst.
 
+5.90114 - 2016-12-19
+  - Fixed regression introduced in the last version (5.90113) which caused 
+    application to hang when the action private name contained a string
+    like 'foo/bar..html'.  If you are running 5.90113 you should consider this
+    a required update.
+
 5.90113 - 2016-12-15
   - Fixed issue with $controller->action_for when targeting an action in
     a namespace nested inside the current controller and the current controller

diff --git a/lib/Catalyst.pm b/lib/Catalyst.pm
index ea96adc..178d502 100644 (file)
--- a/lib/Catalyst.pm
+++ b/lib/Catalyst.pm
@@ -205,7 +205,7 @@ sub composed_stats_class {
 __PACKAGE__->_encode_check(Encode::FB_CROAK | Encode::LEAVE_SRC);
 
 # Remember to update this in Catalyst::Runtime as well!
-our $VERSION = '5.90113';
+our $VERSION = '5.90114';
 $VERSION = eval $VERSION if $VERSION =~ /_/; # numify for warning-free dev releases
 
 sub import {

diff --git a/lib/Catalyst/Runtime.pm b/lib/Catalyst/Runtime.pm
index 4ef1fbe..6f5a59f 100644 (file)
--- a/lib/Catalyst/Runtime.pm
+++ b/lib/Catalyst/Runtime.pm
@@ -7,7 +7,7 @@ BEGIN { require 5.008003; }
 
 # Remember to update this in Catalyst as well!
 
-our $VERSION = '5.90113';
+our $VERSION = '5.90114';
 $VERSION = eval $VERSION if $VERSION =~ /_/; # numify for warning-free dev releases
 
 =head1 NAME

diff --git a/t/relative_root_action_for_bug.t b/t/relative_root_action_for_bug.t
index 825cdb5..06cd0c2 100644 (file)
--- a/t/relative_root_action_for_bug.t
+++ b/t/relative_root_action_for_bug.t
@@ -1,4 +1,6 @@
-use Test::Most;
+use warnings;
+use strict;
+use Test::More;
 
 {
     package MyApp::Controller::Root;
@@ -15,8 +17,8 @@ use Test::Most;
 
     sub top :Chained('root') Args(0) {
       my ($self, $c) = @_;
-      Test::Most::is $self->action_for('top'), 'top';
-      Test::Most::is $self->action_for('story/story'), 'story/story';
+      Test::More::is $self->action_for('top'), 'top';
+      Test::More::is $self->action_for('story/story'), 'story/story';
     }
 
     sub default : Path {
@@ -42,8 +44,8 @@ use Test::Most;
     sub story :Chained(root) Args(0) {
       my ($self, $c) = @_;
 
-      Test::Most::is $self->action_for('story'), 'story/story';
-      Test::Most::is $self->action_for('author/author'), 'story/author/author';
+      Test::More::is $self->action_for('story'), 'story/story';
+      Test::More::is $self->action_for('author/author'), 'story/author/author';
     }
 
     __PACKAGE__->meta->make_immutable;
@@ -62,9 +64,9 @@ use Test::Most;
 
     sub author :Chained(root) Args(0) {
       my ($self, $c, $id) = @_;
-      Test::Most::is $self->action_for('author'), 'story/author/author';
-      Test::Most::is $self->action_for('../story'), 'story/story';
-      Test::Most::is $self->action_for('../../top'), 'top';
+      Test::More::is $self->action_for('author'), 'story/author/author';
+      Test::More::is $self->action_for('../story'), 'story/story';
+      Test::More::is $self->action_for('../../top'), 'top';
     }
 
     __PACKAGE__->meta->make_immutable;