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

Diff of /FigKernelPackages/Subsystem.pm

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

revision 1.128, Wed Apr 30 16:01:28 2008 UTC revision 1.129, Thu May 1 21:40:53 2008 UTC
# Line 1754  Line 1754 
1754    
1755          open($fh, ">$emptycells_file") or die "Cannot open $emptycells_file for writing: $!\n";          open($fh, ">$emptycells_file") or die "Cannot open $emptycells_file for writing: $!\n";
1756          my $gahash = $self->{emptycells};          my $gahash = $self->{emptycells};
1757          foreach my $k1 ( @$gahash ) {          foreach my $k1 ( keys %$gahash ) {
1758            foreach my $k2 ( keys %{ $gahash->{ $k1 } } ) {            foreach my $k2 ( keys %{ $gahash->{ $k1 } } ) {
1759              print $fh $k1."\t".$k2."\t".$gahash->{ $k1 }->{ $k2 }."\n";              print $fh $k1."\t".$k2."\t".$gahash->{ $k1 }->{ $k2 }."\n";
1760            }            }

Legend:
Removed from v.1.128  
changed lines
  Added in v.1.129

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3