/[webpac2]/Webpacus/t/01app.t
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /Webpacus/t/01app.t

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 83 by dpavlin, Mon Nov 21 17:46:27 2005 UTC revision 165 by dpavlin, Sat Nov 26 20:21:54 2005 UTC
# Line 1  Line 1 
1  use Test::More tests => 2;  #!/usr/bin/perl -w
2    
3    use Test::More tests => 9;
4    use blib;
5  use_ok( Catalyst::Test, 'Webpacus' );  use_ok( Catalyst::Test, 'Webpacus' );
6    
7  ok( request('/')->is_success );  # test some URIs
8    
9    foreach my $url (qw#
10            /
11            /search
12            /search/results
13            /search/suggest
14            /search/suggest/TitleProper?all=a
15            /editor
16            /editor/template
17            /editor/css
18    #) {
19            ok( request( $url )->is_success, "$url" );
20    }
Legend:
Removed from v.83  
changed lines
  Added in v.165
  ViewVC Help
Powered by ViewVC 1.1.26