use Maasha::Filesys;
use Maasha::Calc;
use Maasha::XHTML;
-use Maasha::KISS;
use Maasha::BGB::Session;
use Maasha::BGB::Track;
use Maasha::BGB::Draw;
$cookie->{ 'ASSEMBLY' } = $cgi->param( 'assembly' ) || '';
$cookie->{ 'CONTIG' } = $cgi->param( 'contig' ) || '';
$cookie->{ 'Q_ID' } = $cgi->param( 'q_id' );
- $cookie->{ 'NAV_START' } ||= $cgi->param( 'nav_start' ) || $cgi->param( 's_beg' ); # FIXME this is ugly!
- $cookie->{ 'NAV_END' } ||= $cgi->param( 'nav_end' ) || $cgi->param( 's_end' );
+ $cookie->{ 'NAV_START' } ||= $cgi->param( 'nav_start' );
+ $cookie->{ 'NAV_END' } ||= $cgi->param( 'nav_end' );
$cookie->{ 'NAV_CENTER' } = $cgi->param( 'nav_center' );
$cookie->{ 'S_BEG' } = $cgi->param( 's_beg' );
$cookie->{ 'S_END' } = $cgi->param( 's_end' );
my ( @html );
+ if ( $cookie->{ 'SESSION_ID' } ) {
+ push @html, Maasha::XHTML::p( txt => Maasha::XHTML::hidden( name => "session_id", value => $cookie->{ 'SESSION_ID' } ) );
+ }
+
if ( $cookie->{ 'PAGE' } eq 'login' ) {
push @html, page_login( $cookie );
} elsif ( $cookie->{ 'PAGE' } eq 'search' ) {
push @html, page_taxonomy( $cookie );
}
- if ( $cookie->{ 'SESSION_ID' } ) {
- push @html, Maasha::XHTML::p( txt => Maasha::XHTML::hidden( name => "session_id", value => $cookie->{ 'SESSION_ID' } ) );
- }
-
return wantarray ? @html : \@html;
}
foreach $result ( @{ $results } )
{
- $result = Maasha::KISS::kiss2biopiece( $result );
-
$cookie->{ 'CONTIG' } = $result->{ 'S_ID' };
$cookie->{ 'NAV_START' } = $result->{ 'S_BEG' };
$cookie->{ 'NAV_END' } = $result->{ 'S_END' };