[Sashimi-commit] trans_proteomic_pipeline/CGI protxml2html.pl,1.25,1.26

[David S. <ds...@us...>]

Update of /cvsroot/sashimi/trans_proteomic_pipeline/CGI
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv32189

Modified Files:
	protxml2html.pl 
Log Message:
Fixed a problem with displaying right number of columns for flybase Drosophila annotation.

Index: protxml2html.pl
===================================================================
RCS file: /cvsroot/sashimi/trans_proteomic_pipeline/CGI/protxml2html.pl,v
retrieving revision 1.25
retrieving revision 1.26
diff -C2 -d -r1.25 -r1.26
*** protxml2html.pl	4 Nov 2005 23:48:59 -0000	1.25
--- protxml2html.pl	22 Nov 2005 18:53:33 -0000	1.26
***************
*** 2202,2205 ****
--- 2202,2206 ----
  my $flybase_header = '<a TARGET="Win1" href="http://flybase.bio.indiana.edu/.bin/fbidq.html?';
  
+ $tab_header{'flybase'} = '<xsl:if test="/protx:protein_summary/protx:protein_summary_header/@organism=\'Drosophila\'">flybase' . $tab . '</xsl:if>';
  $annot_display{'flybase'} = '<xsl:if test="/protx:protein_summary/protx:protein_summary_header/@organism=\'Drosophila\'"><xsl:if test="protx:annotation/@flybase"><xsl:variable name="flybase" select="protx:annotation/@flybase"/>' . $flybase_header . '{$flybase}"><font color="green">Flybase:<xsl:value-of select="$flybase"/></font></a>' . $table_space . ' </xsl:if></xsl:if>';
  $annot_order{'flybase'} = 9;
***************
*** 2248,2251 ****
--- 2249,2254 ----
  
  
+ 
+ 
  my $asap_file_pre = '';
  my $asap_proph_suf = '_prophet.bof';
***************
*** 3317,3320 ****
--- 3320,3324 ----
  	    }
  	}
+ 	$annot_header .= $tab_header{'flybase'};
  	$annot_header .= '</xsl:if>';
  	$HEADER .= $annot_header if(! ($show_annot eq ''));