[Catalyst-commits] r7819 - trunk/Catalyst-Controller-BindLex/lib/Catalyst/Controller

[matthewt at dev.catalyst.perl.org]

Author: matthewt
Date: 2008-05-27 14:13:48 +0100 (Tue, 27 May 2008)
New Revision: 7819

Modified:
   trunk/Catalyst-Controller-BindLex/lib/Catalyst/Controller/BindLex.pm
Log:
better warning

Modified: trunk/Catalyst-Controller-BindLex/lib/Catalyst/Controller/BindLex.pm
===================================================================
--- trunk/Catalyst-Controller-BindLex/lib/Catalyst/Controller/BindLex.pm	2008-05-27 12:33:54 UTC (rev 7818)
+++ trunk/Catalyst-Controller-BindLex/lib/Catalyst/Controller/BindLex.pm	2008-05-27 13:13:48 UTC (rev 7819)
@@ -162,8 +162,12 @@
 sub _bindlex_setup_warning {
     my ($class, $app) = @_;
     return if $class->config->{unsafe_bindlex_ok};
+    $app->log->warn("****");
+    $app->log->warn("**** IMPORTANT WARNING: BindLex");
+    $app->log->warn("****");
     $app->log->warn("Controller class $class using Catalyst::Controller::BindLex; this module is unmaintained and considered -dangerous-");
     $app->log->warn("Please see the documentation for an explanation and how to disable this warning if you want to take the risk");
+    $app->log->warn("****");
 }
 
 1;