[Bps-public-commit] r16938 - in Path-Dispatcher/trunk: lib/Path/Dispatcher

[sartak at bestpractical.com]

Author: sartak
Date: Wed Nov 19 16:21:23 2008
New Revision: 16938

Modified:
   Path-Dispatcher/trunk/   (props changed)
   Path-Dispatcher/trunk/lib/Path/Dispatcher/Declarative.pm

Log:
 r75830 at onn:  sartak | 2008-11-19 16:21:18 -0500
 Add the under rule earlier so it gets a name for subrules to use


Modified: Path-Dispatcher/trunk/lib/Path/Dispatcher/Declarative.pm
==============================================================================
--- Path-Dispatcher/trunk/lib/Path/Dispatcher/Declarative.pm	(original)
+++ Path-Dispatcher/trunk/lib/Path/Dispatcher/Declarative.pm	Wed Nov 19 16:21:23 2008
@@ -99,12 +99,12 @@
                 predicate => $predicate,
             );
 
+            $into->_add_rule($under, @_);
+
             do {
                 local $UNDER_RULE = $under;
                 $rules->();
             };
-
-            $into->_add_rule($under, @_);
         },
         redispatch_to => sub {
             my ($dispatcher) = @_;