Parent Directory | Revision Log
Import of web font-end for WebPAC v2 called WebPACus based on Catalyst
1 | dpavlin | 83 | package Webpacus::Controller::Results; |
2 | |||
3 | use strict; | ||
4 | use warnings; | ||
5 | use base 'Catalyst::Controller'; | ||
6 | |||
7 | =head1 NAME | ||
8 | |||
9 | Webpacus::Controller::Results - Catalyst Controller | ||
10 | |||
11 | =head1 SYNOPSIS | ||
12 | |||
13 | See L<Webpacus> | ||
14 | |||
15 | =head1 DESCRIPTION | ||
16 | |||
17 | Catalyst Controller. | ||
18 | |||
19 | =head1 METHODS | ||
20 | |||
21 | =over 4 | ||
22 | |||
23 | =item default | ||
24 | |||
25 | =cut | ||
26 | |||
27 | sub default : Private { | ||
28 | my ( $self, $c ) = @_; | ||
29 | |||
30 | sleep 3; | ||
31 | |||
32 | $c->stash->{template} = 'results.tt'; | ||
33 | } | ||
34 | |||
35 | =back | ||
36 | |||
37 | |||
38 | =head1 AUTHOR | ||
39 | |||
40 | Dobrica Pavlinusic,,, | ||
41 | |||
42 | =head1 LICENSE | ||
43 | |||
44 | This library is free software, you can redistribute it and/or modify | ||
45 | it under the same terms as Perl itself. | ||
46 | |||
47 | =cut | ||
48 | |||
49 | 1; |
ViewVC Help | |
Powered by ViewVC 1.1.26 |