Updated helper
Sebastian Riedel [Fri, 3 Mar 2006 12:16:19 +0000 (12:16 +0000)]
lib/Catalyst/Helper.pm

index 50c163a..acc818b 100644 (file)
@@ -269,7 +269,7 @@ sub next_test {
         $self->{prefix} = $prefix;
         $prefix         = lc $prefix;
         $prefix =~ s/-/\//g;
-        $self->{uri} = $prefix;
+        $self->{uri} = "/$prefix";
     }
     my $dir  = $self->{test_dir};
     my $type = lc $self->{type};