/[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

Annotation of /Webpacus/t/01app.t

Parent Directory Parent Directory | Revision Log Revision Log


Revision 271 - (hide annotations)
Sat Dec 17 03:19:58 2005 UTC (18 years, 5 months ago) by dpavlin
File MIME type: application/x-troff
File size: 448 byte(s)
 r11749@llin:  dpavlin | 2005-12-17 07:22:09 +0100
 VERY broken state: Moved databases to own model (with iconv conversion using
 new config_encoding and moved catalyst_encoding), and a try to add database
 list (which will become checkboxes) to search form.

1 dpavlin 155 #!/usr/bin/perl -w
2    
3 dpavlin 271 use Test::More tests => 14;
4 dpavlin 155 use blib;
5 dpavlin 83 use_ok( Catalyst::Test, 'Webpacus' );
6    
7 dpavlin 165 # test some URIs
8 dpavlin 155
9 dpavlin 165 foreach my $url (qw#
10     /
11     /search
12     /search/results
13 dpavlin 271 /search/results/ajax
14     /search/results?all=a
15     /search/results/ajax?all=a
16     /search/results?all=a&_ajax=1
17     /search/results/ajax?all=a&_ajax=1
18 dpavlin 165 /search/suggest
19     /search/suggest/TitleProper?all=a
20     /editor
21     /editor/template
22     /editor/css
23     #) {
24     ok( request( $url )->is_success, "$url" );
25     }

  ViewVC Help
Powered by ViewVC 1.1.26