--- a/CrashTest.pl Sun Aug 03 17:35:01 2014 +0200
+++ b/CrashTest.pl Sun Aug 03 17:40:13 2014 +0200
@@ -23,6 +23,8 @@
my @valid_params = qw/Add-ons Distributor ProductName ReleaseChannel StartupTime UserID Version BuildID CrashTime Comments/;
my $config = plugin 'Config';
+plugin 'TagHelpers::BootstrapPagination';
+
app->attr(storage => sub {
my $self = shift;
eval "require $config->{Storage}->{Type}" or die "Loading module failed $@";
@@ -78,7 +80,14 @@
get '/' => sub {
my $self = shift;
- $self->stash(files => $self->app->storage->index());
+ my $page = 1;
+ $self->validation->required('page')->like(qr/^[0-9]+$/);
+ $page = scalar $self->validation->param("page") if $self->validation->is_valid('page');
+
+ my $result = $self->app->storage->index($page, 20);
+
+ $self->stash(files => $result->{crashs});
+ $self->stash(pager => $result->{pager});
$self->render('index');
} => 'index';