[Bio] / FigKernelPackages / BlankSVP.pm Repository:
ViewVC logotype

View of /FigKernelPackages/BlankSVP.pm

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.1 - (download) (as text) (annotate)
Mon Nov 14 21:42:36 2011 UTC (8 years, 4 months ago) by olson
Branch: MAIN
CVS Tags: rast_rel_2014_0912, rast_rel_2014_0729, mgrast_release_3_1_2, mgrast_version_3_2, mgrast_dev_12152011, HEAD
Script & infrastructure for creating easy seedviewer pages.

package BlankSVP;

use strict;
use HTML;
use Data::Dumper;

sub run
{
    my($fig, $cgi, $sapObject, $user, $url, $hidden_form_var) = @_;

    my @html = ();

    my $feature = $cgi->param("fid");

    my $func = $fig->function_of($feature);
    push(@html, "The function of $feature is $func");

    my $title = "Function for $feature";

    my $html_txt = join("", @html);
    return($html_txt, $title);
}

1;

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3