lib/SGN/Controller/Search/Markers.pm

   1 =head1 NAME
   2
   3 SGN::Controller::Search::Markers
   4
   5 =head1 DESCRIPTION
   6
   7 Controller for unified marker / variant search page
   8
   9 =cut
  10
  11 package SGN::Controller::Search::Markers;
  12
  13 use strict;
  14 use Moose;
  15
  16 BEGIN { extends 'Catalyst::Controller' }
  17
  18 #
  19 # UNIFIED MARKER SEARCH PAGE
  20 # PATH: /search/variants
  21 #
  22 sub search_variants : Path('/search/variants') Args(0) {
  23     my ( $self, $c ) = @_;
  24     $c->stash->{template} = '/search/markers/search.mas';
  25 }
  26
  27
  28 #
  29 # VARIANT SEARCH RESULTS
  30 # PATH: /search/variants/results
  31 #
  32 sub results_variants : Path('/search/variants/results') Args(0) {
  33     my ( $self, $c ) = @_;
  34     $c->stash->{template} = '/search/markers/results.mas';
  35 }
  36
  37
  38 1;