]> iEval git - gruntmaster-page.git/blob - lib/Gruntmaster/Page/Us.pm
Pass PSGI env to generators
[gruntmaster-page.git] / lib / Gruntmaster / Page / Us.pm
1 package Gruntmaster::Page::Us;
2
3 use 5.014000;
4 use strict;
5 use warnings;
6 use Gruntmaster::Page::Base us => 'Users';
7 our @ISA = qw/Gruntmaster::Page::Base/;
8 our $VERSION = '0.001';
9
10 use constant TEMPLATES => {
11 en => <<'HTML',
12 <div class="list-group"><tmpl_loop users><a class="list-group-item" href="<tmpl_var id>"><tmpl_var name></a>
13 </tmpl_loop></ol>
14 HTML
15 };
16
17 sub _generate{
18 my ($self, $htc, $lang, $env) = @_;
19 debug $env => "language is '$lang'";
20
21 $htc->param(users => [ sort { lc $a->{name} cmp lc $b->{name} }
22 map { {id => $_, name => user_name} }
23 grep { user_name =~ /\w/ } users ]);
24 }
25
26 1
This page took 0.058869 seconds and 4 git commands to generate.