[Catalyst-commits] r8138 - in Catalyst-Runtime/5.70/trunk: . lib

[bricas at dev.catalyst.perl.org]

Author: bricas
Date: 2008-07-18 12:23:28 +0100 (Fri, 18 Jul 2008)
New Revision: 8138

Modified:
   Catalyst-Runtime/5.70/trunk/Changes
   Catalyst-Runtime/5.70/trunk/lib/Catalyst.pm
Log:
Added the supplied argument to the regexp fallback warning for easier debugging

Modified: Catalyst-Runtime/5.70/trunk/Changes
===================================================================
--- Catalyst-Runtime/5.70/trunk/Changes	2008-07-18 08:42:21 UTC (rev 8137)
+++ Catalyst-Runtime/5.70/trunk/Changes	2008-07-18 11:23:28 UTC (rev 8138)
@@ -2,6 +2,8 @@
 
 5.7xxxxxx XXXX
         - Fix regressions for regexp fallback in model(), view() and controller()
+        - Added the supplied argument to the regexp fallback warning for easier
+          debugging
 
 5.7099_02 2008-07-16 19:10:00
         - Added PathPrefix attribute

Modified: Catalyst-Runtime/5.70/trunk/lib/Catalyst.pm
===================================================================
--- Catalyst-Runtime/5.70/trunk/lib/Catalyst.pm	2008-07-18 08:42:21 UTC (rev 8137)
+++ Catalyst-Runtime/5.70/trunk/lib/Catalyst.pm	2008-07-18 11:23:28 UTC (rev 8138)
@@ -461,6 +461,7 @@
 
     # don't warn if we didn't find any results, it just might not exist
     if( @result ) {
+        $c->log->warn( qq(Found results for "${name}" using regexp fallback.) );
         $c->log->warn( 'Relying on the regexp fallback behavior for component resolution is unreliable and unsafe.' );
         $c->log->warn( 'If you really want to search, pass in a regexp as the argument.' );
     }