File: zerorm.t

package info (click to toggle)
libcgi-application-perl 4.10-1
  • links: PTS, VCS
  • area: main
  • in suites: lenny
  • size: 356 kB
  • ctags: 118
  • sloc: perl: 1,124; makefile: 40
file content (18 lines) | stat: -rw-r--r-- 318 bytes parent folder | download | duplicates (7)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
use Test::More tests=>1;
use strict;

# Include the test hierarchy
use lib 't/lib';

use TestApp10;

# Prevent output to STDOUT
$ENV{CGI_APP_RETURN_ONLY} = 1;

# A runmode of '0' should be allowed
{
    my $app = TestApp10->new;
       my $output = $app->run();
    like($output, qr/Success!$/, "Runmode 0 works");
}