File Coverage

File:t/3-replace.t
Coverage:100.0%

linestmtbrancondsubpodtimecode
1
1
1
1
1272034655776150
12869
11
use Test::More;
2
1
1
1
470
2138
6
use Test::Exception;
3
1
1
1
349
928507
18
use Catalyst ();
4
1
1
1
171
1
17
use Catalyst::Controller::Combine ();
5
1
1
1
196
935
31
use FindBin;
6
1
1
1
3
1
28
use Path::Class::File;
7
8# a simple package
9{
10
1
408016
    package MyApp::Controller::Css;
11
1
1
1
3
0
8
    use Moose;
12
1
9
    extends 'Catalyst::Controller::Combine';
13
14
1
3465
    __PACKAGE__->config(
15        # dir => 'static/css', # redundant, defaults to static/<<action_namespace>>
16        # extension => 'css', # redundant, defaults to <<action_namespace>>
17        depend => {
18            css1 => 'base',
19            css2 => 'css1',
20        },
21
22        replace => {
23            '*' => [ 'xx' => 'REPL:\\$1' ],
24            'css*' => [ a => 'b', qr{u+} => 'v' ],
25            'css2' => [ url => 'URI' ],
26        },
27        # will be guessed from extension
28        # mimetype => 'application/javascript',
29    );
30}
31
32# setup our Catalyst :-)
33
1
185
my $c = Catalyst->new();
34
1
385
$c->setup_log();
35
1
914
$c->setup_home("$FindBin::Bin");
36
37
1
707
my $controller;
38
1
1
11
103
lives_ok { $controller = $c->setup_component('MyApp::Controller::Css') } 'setup component worked';
39
40
1
337
done_testing;
41
42### TODO: append a reasonable test...