lib/SGN/Controller/Search/Annotation.pm

   1 package SGN::Controller::Search::Annotation;
   2 use Moose;
   3
   4 BEGIN{ extends 'Catalyst::Controller' }
   5
   6
   7 sub annotation_search : Path('/search/annotation') CaptureArgs(1) {
   8     my $self = shift;
   9     my $c = shift;
  10     my $page = shift;
  11
  12     my $template = '/search/annotation/'.$page. '.mas';
  13
  14     $c->stash(
  15         template => $template,
  16      );
  17
  18     $c->throw_404
  19         unless $c->view('Mason')->component_exists( $template );
  20
  21 }
  22
  23 1;