From f7701a60f217ab154fe53a5d13bbd223f6182150 Mon Sep 17 00:00:00 2001 From: Guilhem Moulin Date: Sat, 19 Jan 2013 02:22:17 +0100 Subject: =?UTF-8?q?CanCreate=20=E2=86=92=20CanAdd?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- lib/Fripost/Panel/Interface.pm | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) (limited to 'lib/Fripost/Panel') diff --git a/lib/Fripost/Panel/Interface.pm b/lib/Fripost/Panel/Interface.pm index c7e892c..d04fa3a 100644 --- a/lib/Fripost/Panel/Interface.pm +++ b/lib/Fripost/Panel/Interface.pm @@ -108,7 +108,7 @@ sub ListLocals : Runmode { # Can the user add aliases? $template->param( canAddalias => $domain{permissions} =~ /[aop]/ ); $template->param( listCanAddAlias => [ map { {user => encode_entities($_)} } - @{$domain{canCreateAlias}} ] ) + @{$domain{canAddAlias}} ] ) if $domain{permissions} =~ /[op]/; # Should we list aliases? $template->param( listAliases => $#aliases >= 0 || @@ -130,7 +130,7 @@ sub ListLocals : Runmode { # Can the user add lists? $template->param( canAddList => $domain{permissions} =~ /[lop]/ ); $template->param( listCanAddList => [ map { {user => encode_entities($_)} } - @{$domain{canCreateList}} ] ) + @{$domain{canAddList}} ] ) if $domain{permissions} =~ /[op]/; # Should we list lists? $template->param( listLists => $#lists >= 0 || $domain{permissions} =~ /[lop]/ ); @@ -172,8 +172,8 @@ sub EditDomain : Runmode { isactive => $q->param('isactive'), description => $q->param('description'), catchalls => $q->param('catchalls'), - canCreateAlias => $q->param('canCreateAlias'), - canCreateList => $q->param('canCreateList') + canAddAlias => $q->param('canAddAlias'), + canAddList => $q->param('canAddList') }, -concat => "(\n|\x{0D}\x{0A})"); } my %domain = $fp->domain->get( $d, -die => 404 ); @@ -189,16 +189,16 @@ sub EditDomain : Runmode { $template->param( isactive => $q->param('isactive') , description => $q->param('description') , catchalls => $q->param('catchalls') - , canCreateAlias => $q->param('canCreateAlias') - , canCreateList => $q->param('canCreateList') + , canAddAlias => $q->param('canAddAlias') + , canAddList => $q->param('canAddList') , error => encode_entities ($error) ); } else { $template->param( isactive => $domain{isactive} , description => &mkFormContent (@{$domain{description}}) , catchalls => &mkFormContentE (@{$domain{catchalls}}) - , canCreateAlias => &mkFormContentE (@{$domain{canCreateAlias}}) - , canCreateList => &mkFormContentE (@{$domain{canCreateList}}) + , canAddAlias => &mkFormContentE (@{$domain{canAddAlias}}) + , canAddList => &mkFormContentE (@{$domain{canAddList}}) ); } $template->param( newChanges => defined $q->param('submit') ); -- cgit v1.2.3