[Catalyst-commits] r6811 - trunk/Catalyst-View-Mason/lib/Catalyst/View

[rafl at dev.catalyst.perl.org]

Author: rafl
Date: 2007-08-28 17:04:12 +0100 (Tue, 28 Aug 2007)
New Revision: 6811

Modified:
   trunk/Catalyst-View-Mason/lib/Catalyst/View/Mason.pm
Log:
$self will always be an object when we're emitting deprecation warnings.


Modified: trunk/Catalyst-View-Mason/lib/Catalyst/View/Mason.pm
===================================================================
--- trunk/Catalyst-View-Mason/lib/Catalyst/View/Mason.pm	2007-08-28 16:04:07 UTC (rev 6810)
+++ trunk/Catalyst-View-Mason/lib/Catalyst/View/Mason.pm	2007-08-28 16:04:12 UTC (rev 6811)
@@ -91,7 +91,7 @@
     delete @config{qw/use_match template_extension/};
 
     if ($self->config->{use_match}) {
-        $c->log->warn(sprintf(<<'EOW', blessed $self ? ref $self : $self));
+        $c->log->warn(sprintf(<<'EOW', ref $self));
 DEPRECATION WARNING: %s sets the use_match config variable to a true value.
 This has been deprecated as been deprecated. Please see the
 Catalyst::View::Mason documentation for details on use_match.