view release on metacpan or  search on metacpan

lib/Catalyst/ActionRole/Tabs.pm  view on Meta::CPAN

  }

  # edit action has a tab
  sub edit : Local Does(Tabs) Tab {
    ...
    $form->action($c->uri_for('update'));
    ...
  }

  # update action uses same tab as edit action
  sub update : Local Does(Tabs) TabAlias(edit) {
    ...
    if ($form->result->has_errors) {
      $stash->{template} = 'edit.tt2';
    }
    else {
      $c->response->redirect($c->uri_for('view'));
  }


  [% # Tab template %]

t/lib/TestChained/Controller/Test.pm  view on Meta::CPAN

}

sub edit :
PathPart Chained(id) Args(0)
Does(Tabs) Tab
{
    my ($self, $c) = @_;
    $c->stash->{msg} .= '-edit';
}

sub update :
PathPart Chained(id) Args(0)
Does(Tabs) TabAlias(edit)
{
    my ($self, $c) = @_;
    $c->stash->{msg} .= '-update';
}

sub remove :
PathPart Chained(id) Args(0)
Does(Tabs) Tab