aboutsummaryrefslogtreecommitdiffstats
path: root/lib
diff options
context:
space:
mode:
authorGuilhem Moulin <guilhem.moulin@fripost.org>2012-09-01 03:07:36 +0200
committerGuilhem Moulin <guilhem.moulin@fripost.org>2012-09-01 03:07:36 +0200
commitcd2e069816416dd42ed2528e4843c07309a31f27 (patch)
treea5321840e80c6d9979e36bfd2e71ffbebeeeda3e /lib
parent0b099273c878e84b5829f7b44eaa77686c2cd587 (diff)
Caching the templates.
Diffstat (limited to 'lib')
-rw-r--r--lib/FPanel/Interface.pm14
-rw-r--r--lib/FPanel/Login.pm12
2 files changed, 17 insertions, 9 deletions
diff --git a/lib/FPanel/Interface.pm b/lib/FPanel/Interface.pm
index adac0f0..0d2cd0e 100644
--- a/lib/FPanel/Interface.pm
+++ b/lib/FPanel/Interface.pm
@@ -18,7 +18,9 @@ sub cgiapp_init {
sub index : Runmode {
my $self = shift;
- my $template = $self->load_tmpl("index.html");
+ my $template = $self->load_tmpl('index.html'
+ , cache => 1
+ , utf8 => 1 );
my $domain = (split /\//, $ENV{PATH_INFO},3)[1];
$template->param({
NAME => 'INDEX',
@@ -55,19 +57,19 @@ sub DomainList : StartRunmode {
die $domains->error if $domains->code;
- my $template = $self->load_tmpl("domain-list.html");
+ my $template = $self->load_tmpl('domain-list.html'
+ , cache => 1
+ , utf8 => 1
+ , loop_context_vars => 1 );
my $url = $self->query->url();
$template->param( URL => $url );
$template->param( USER_LOCALPART => $u, USER_DOMAINPART => $d);
- my $i = 1;
$template->param( DOMAIN => [
- map { $i = 1-$i;
- { DOMAIN => $_->get_value('fvd')
+ map { { DOMAIN => $_->get_value('fvd')
, PERMS => &list_perms($_, $dn)
, DESCRIPTION => join ("\n", $_->get_value('description'))
, ISACTIVE => $_->get_value('fripostIsStatusActive') eq 'TRUE' ? 1 : 0
, URL => $url
- , ODD => $i
};
}
$domains->sorted('fvd')
diff --git a/lib/FPanel/Login.pm b/lib/FPanel/Login.pm
index 332a380..dc5ae3a 100644
--- a/lib/FPanel/Login.pm
+++ b/lib/FPanel/Login.pm
@@ -67,7 +67,7 @@ sub setup {
}
-# This method choses the Run Mode depending on the URL and query string.
+# This method chooses the Run Mode depending on the URL and query string.
sub mymode_param {
my $self = shift;
my $q = $self->query;
@@ -135,7 +135,9 @@ sub login : Runmode {
sub login_box {
my $self = shift;
- my $template = $self->load_tmpl('login.html');
+ my $template = $self->load_tmpl('login.html'
+ , cache => 1
+ , utf8 => 1 );
my $destination = $self->query->param('destination') //
$self->mymode_param();
@@ -159,10 +161,14 @@ sub logout : Runmode {
sub error_rm : ErrorRunmode {
my $self = shift;
my $error = shift;
- my $template = $self->load_tmpl("template/error.html");
+
+ my $template = $self->load_tmpl('error.html'
+ , cache => 1
+ , utf8 => 1 );
$template->param(NAME => 'ERROR');
$template->param(MESSAGE => $error);
$template->param(URL => $self->query->url);
+
return $template->output;
}