[Bps-public-commit] r14816 - in Path-Dispatcher/trunk: lib/Path

[sartak at bestpractical.com]

Author: sartak
Date: Tue Aug  5 19:15:30 2008
New Revision: 14816

Modified:
   Path-Dispatcher/trunk/   (props changed)
   Path-Dispatcher/trunk/lib/Path/Dispatcher.pm

Log:
 r54133 at gorgoroth:  sartak | 2008-08-05 19:15:27 -0400
 Throw an error if "use Path::Dispatcher -base" or similar is used


Modified: Path-Dispatcher/trunk/lib/Path/Dispatcher.pm
==============================================================================
--- Path-Dispatcher/trunk/lib/Path/Dispatcher.pm	(original)
+++ Path-Dispatcher/trunk/lib/Path/Dispatcher.pm	Tue Aug  5 19:15:30 2008
@@ -204,6 +204,14 @@
     return 1;
 }
 
+sub import {
+    my $self = shift;
+
+    if (@_) {
+        Carp::croak "use Path::Dispatcher (@_) called. Did you mean Path::Dispatcher::Declarative?";
+    }
+}
+
 __PACKAGE__->meta->make_immutable;
 no Moose;