$prefix = $prefix;
$tname = $prefix . '.t';
$self->{prefix} = $prefix;
+ $prefix = lc $prefix;
+ $prefix =~ s/-/\//g;
+ $self->{uri} = $prefix;
}
my $dir = $self->{test_dir};
my $type = $self->{type};
=head1 LICENSE
-This library is free software . You can redistribute it and/or modify
+This library is free software . You can redistribute it and/or modify
it under the same terms as perl itself.
=cut
=head1 LICENSE
-This library is free software . You can redistribute it and/or modify
+This library is free software . You can redistribute it and/or modify
it under the same terms as perl itself.
=cut
Copyright 2004 Sebastian Riedel. All rights reserved.
-This library is free software. You can redistribute it and/or modify
+This library is free software. You can redistribute it and/or modify
it under the same terms as perl itself.
=cut
Copyright 2004 Sebastian Riedel. All rights reserved.
-This library is free software. You can redistribute it and/or modify
+This library is free software. You can redistribute it and/or modify
it under the same terms as perl itself.
=cut
Copyright 2004 Sebastian Riedel. All rights reserved.
-This library is free software. You can redistribute it and/or modify
+This library is free software. You can redistribute it and/or modify
it under the same terms as perl itself.
=cut
Copyright 2004 Sebastian Riedel. All rights reserved.
-This library is free software. You can redistribute it and/or modify
+This library is free software. You can redistribute it and/or modify
it under the same terms as perl itself.
=cut
Copyright 2004 Sebastian Riedel. All rights reserved.
-This library is free software. You can redistribute it and/or modify
+This library is free software. You can redistribute it and/or modify
it under the same terms as perl itself.
=cut
=head1 LICENSE
-This library is free software . You can redistribute it and/or modify
+This library is free software . You can redistribute it and/or modify
it under the same terms as perl itself.
=cut
use_ok( Catalyst::Test, '[% app %]' );
use_ok('[% class %]');
-ok( request('[% prefix %]')->is_success );
+ok( request('[% uri %]')->is_success );
[% ELSE %]
use Test::More tests => 1;
use_ok('[% class %]');