]> git.donarmstrong.com Git - biopieces.git/blobdiff - www/index.cgi
added grid to BGB
[biopieces.git] / www / index.cgi
index 85fed675115605e54c0fb8079670cc938fd8bfaf..38b1988af96addb41c9096f340b102c7874d6bc5 100755 (executable)
@@ -165,7 +165,7 @@ sub cookie_default
     $cookie->{ 'MOVE_RIGHT3' }     = $cgi->param( 'move_right3' );
 
     $cookie->{ 'IMG_WIDTH' }       = 1200;   # Width of browser image in pixels
-    $cookie->{ 'IMG_HEIGHT' }      = 800;    # Height of browser image in pixels
+    $cookie->{ 'IMG_HEIGHT' }      = 800;    # Height of browser image in pixels  # TODO: Redundant?
     $cookie->{ 'WIGGLE_HEIGHT' }   = 75;     # Height of Wiggle tracks in pixels
     $cookie->{ 'TRACK_OFFSET' }    = 20;
     $cookie->{ 'TRACK_SPACE' }     = 20;
@@ -1123,6 +1123,8 @@ sub section_browse
         push @tracks, [ Maasha::BGB::Track::track_feature( $track_list[ $i ], $cookie ) ];
     }
 
+    unshift @tracks, [ Maasha::BGB::Track::track_grid( $cookie ) ];
+
     $surface = Cairo::ImageSurface->create( 'argb32', $cookie->{ 'IMG_WIDTH' }, $cookie->{ 'TRACK_OFFSET' } );
     $cr      = Cairo::Context->create( $surface );
 
@@ -1180,7 +1182,7 @@ sub section_browse
     {
         foreach $elem ( @{ $track } )
         {
-            next if $elem->{ 'type' } =~ /text|wiggle/;
+            next if $elem->{ 'type' } =~ /grid|text|wiggle/;
 
             if ( $elem->{ 'type' } eq 'track_name' )
             {