fixing Components integration

[maypole.git] / lib / Maypole.pm

diff --git a/lib/Maypole.pm b/lib/Maypole.pm
index 2f609d8b0496b1838e5069b403e1f5273afcdc1b..3fcfd159a835442d78ec806fdb1c948765e25efd 100644 (file)
--- a/lib/Maypole.pm
+++ b/lib/Maypole.pm
@@ -457,8 +457,9 @@ sub handler : method  {
 }
 
 sub component {
+  my ($r,$path) = @_;
   my $component = Maypole::Components->new(@_);
-  return $component->handler;
+  return $component->handler($path);
 }