EnsEMBL::Web::Filter WebAdmin
Included librariesPackage variablesGeneral documentationMethods
Toolbar
WebCvsRaw content
Package variables
No package variables defined.
Included modules
EnsEMBL::Web::RegObj
EnsEMBL::Web::Registry
Inherit
EnsEMBL::Web::Filter
Synopsis
No synopsis!
Description
No description!
Methods
BUILD
No description
Code
catch
No description
Code
Methods description
None available.
Methods code
BUILDdescriptionprevnextTop
sub BUILD {
  my ($self, $ident, $args) = @_;
  $self->set_redirect('/Account/Login?popup=no');
  ## Set the messages hash here
$self->set_messages({ 'not_member' => 'You are either not logged in or you are not a member of this group. If you think this is incorrect, please contact the web team.', });
}
catchdescriptionprevnextTop
sub catch {
  my $self = shift;
  my $user  = $EnsEMBL::Web::RegObj::ENSEMBL_WEB_REGISTRY->get_user;
  unless ($user && $user->is_member_of($self->object->species_defs->ENSEMBL_WEBADMIN_ID)) {
    $self->set_error_code('not_member');
  }
}

}

1;
}
General documentation
No general documentation available.