%doc> -- DNS Zone tasks -- %doc> % <%attr> title => 'Zone Tasks' %attr> % % %####################################################################### %# %# Args section %# %####################################################################### <%args> $user => $ui->get_current_user($r) $action => undef $search => undef $zone_id => undef $zone_name => undef $template_zone => undef $submit => undef $show_tasks => undef $showheader => 1 $view => 'search' %args> % % % %####################################################################### %# %# INIT section %# %####################################################################### % <%init> my $DEBUG = 0; print '%ARGS is
', Dumper(%ARGS), '
% if ( $view eq 'search' ){ % }elsif ( $view eq 'new' ){ % unless ( $manager && $manager->can($user, 'access_admin_section', 'zone_tasks.html:new') ){ % $m->comp('/generic/error.mhtml', error => "You do not have permission to add new zones"); % } % } |