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

[rafl at dev.catalyst.perl.org]

Author: rafl
Date: 2010-02-14 11:30:23 +0000 (Sun, 14 Feb 2010)
New Revision: 12861

Modified:
   Catalyst-Runtime/5.80/trunk/lib/Catalyst.pm
Log:
Make the debug log say the cat version with all its digits.

Modified: Catalyst-Runtime/5.80/trunk/lib/Catalyst.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/lib/Catalyst.pm	2010-02-13 14:50:42 UTC (rev 12860)
+++ Catalyst-Runtime/5.80/trunk/lib/Catalyst.pm	2010-02-14 11:30:23 UTC (rev 12861)
@@ -79,6 +79,8 @@
 # Remember to update this in Catalyst::Runtime as well!
 
 our $VERSION = '5.80020';
+our $PRETTY_VERSION = $VERSION;
+
 $VERSION = eval $VERSION;
 
 sub import {
@@ -1144,7 +1146,7 @@
 
     if ( $class->debug ) {
         my $name = $class->config->{name} || 'Application';
-        $class->log->info("$name powered by Catalyst $Catalyst::VERSION");
+        $class->log->info("$name powered by Catalyst $Catalyst::PRETTY_VERSION");
     }
 
     # Make sure that the application class becomes immutable at this point,