lib/SGN/Controller/QualityControl.pm

   1
   2 package SGN::Controller::QualityControl;
   3
   4 use Moose;
   5 use URI::FromHash qw | uri |;
   6
   7 BEGIN { extends 'Catalyst::Controller' };
   8
   9
  10 sub quality_control_index :Path('/tools/qualitycontrol') Args(0) {
  11
  12     my $self = shift;
  13     my $c = shift;
  14
  15     if (!$c->user()) {
  16         $c->res->redirect( uri( path => '/user/login', query => { goto_url => $c->req->uri->path_query } ) );
  17     }
  18
  19     $c->stash->{template} = '/tools/qualityControl/dataset_quality_control.mas';
  20 }
  21
  22 1;