[Catalyst-commits] r8365 - Catalyst-Runtime/5.80/trunk/lib/Catalyst

[rafl at dev.catalyst.perl.org]

Author: rafl
Date: 2008-09-08 14:26:21 +0100 (Mon, 08 Sep 2008)
New Revision: 8365

Modified:
   Catalyst-Runtime/5.80/trunk/lib/Catalyst/ActionContainer.pm
Log:
Make ActionChain stringify to its part attribute.

This is used in the listing of private actions in debug mode.

Modified: Catalyst-Runtime/5.80/trunk/lib/Catalyst/ActionContainer.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/lib/Catalyst/ActionContainer.pm	2008-09-08 13:25:46 UTC (rev 8364)
+++ Catalyst-Runtime/5.80/trunk/lib/Catalyst/ActionContainer.pm	2008-09-08 13:26:21 UTC (rev 8365)
@@ -27,6 +27,11 @@
 
 no Moose;
 
+use overload (
+    # Stringify to path part for tree search
+    q{""} => sub { shift->part },
+);
+
 sub get_action {
     my ( $self, $name ) = @_;
     return $self->actions->{$name} if defined $self->actions->{$name};