[Bio] / FigWebServices / subsys_summary.cgi Repository:
ViewVC logotype

Diff of /FigWebServices/subsys_summary.cgi

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.22, Thu Feb 17 23:24:31 2005 UTC revision 1.23, Thu Feb 17 23:28:25 2005 UTC
# Line 360  Line 360 
360   open (OUT, ">>/home/fig/for_annotators/chosen_subsystems.txt") || die "Can't open /home/fig/for_annotators/chosen_subsystems.txt";   open (OUT, ">>/home/fig/for_annotators/chosen_subsystems.txt") || die "Can't open /home/fig/for_annotators/chosen_subsystems.txt";
361   my $txt;   my $txt;
362   for (my $i=1; $i<=$max; $i++) {   for (my $i=1; $i<=$max; $i++) {
363      if ($cgi->param('cbox')) {
364    print OUT $i, "\t", $cgi->param('user'),"\t", $cgi->param("ss$i"), "\n";    print OUT $i, "\t", $cgi->param('user'),"\t", $cgi->param("ss$i"), "\n";
365    $txt.="\n" . $i . "\t" .$cgi->param('user') . "\t".  $cgi->param("ss$i"). "\n";    $txt.="\n" . $i . "\t" .$cgi->param('user') . "\t".  $cgi->param("ss$i"). "\n";
366   }   }
367     }
368   push @$html,  "These were chosen<p><pre>$txt</pre><p>\n";   push @$html,  "These were chosen<p><pre>$txt</pre><p>\n";
369  }  }
370    

Legend:
Removed from v.1.22  
changed lines
  Added in v.1.23

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3