X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FDispatcher.pm;h=d9fe5b3bf41f622eea0bee314e5a8c124b00e198;hb=9434a81501df74c1bbe5745cc2bc3476213f2733;hp=3b9b3d65dd1e5ab46badad7556a00ed04a0800d4;hpb=bd719c379873ab2d857c54227f7c8f36b8303a1e;p=catagits%2FCatalyst-Runtime.git

diff --git a/lib/Catalyst/Dispatcher.pm b/lib/Catalyst/Dispatcher.pm
index 3b9b3d6..d9fe5b3 100644
--- a/lib/Catalyst/Dispatcher.pm
+++ b/lib/Catalyst/Dispatcher.pm
@@ -518,7 +518,7 @@ sub register {
             #         we eat exceptions loading dispatch types.
             eval { Class::MOP::load_class($class) };
             my $load_failed = $@;
-            $self->_check_depreciated_dispatch_type( $key, $load_failed );
+            $self->_check_deprecated_dispatch_type( $key, $load_failed );
             push( @{ $self->dispatch_types }, $class->new ) unless $load_failed;
             $registered->{$class} = 1;
         }
@@ -691,7 +691,7 @@ sub dispatch_type {
     return undef;
 }
 
-sub _check_depreciated_dispatch_type {
+sub _check_deprecated_dispatch_type {
     my ($self, $key, $load_failed) = @_;
 
     return unless $key =~ /^(Local)?Regexp?/;
@@ -702,7 +702,7 @@ sub _check_depreciated_dispatch_type {
               . "  Use Chained methods or install the standalone\n"
               . "  Catalyst::DispatchType::Regex if necessary.\n" );
     } elsif ( !defined $Catalyst::DispatchType::Regex::VERSION
-        || $Catalyst::DispatchType::Regex::VERSION <= 5.90020 ) {
+        || $Catalyst::DispatchType::Regex::VERSION le '5.90020' ) {
         # We loaded the old core version of the Regex module this will break
         warn(   "The $key DispatchType has been removed from Catalyst core.\n"
               . "  An old version of the core Catalyst::DispatchType::Regex\n"