Parent Directory
| 
Revision Log
| 
Patch
| revision 3599 by michael-guest, Sat Jul 22 00:39:12 2006 UTC | revision 3600 by michael-guest, Sat Jul 22 00:40:21 2006 UTC | |
|---|---|---|
| # | Line 140 foreach my $config ( keys %FAI::configs | Line 140 foreach my $config ( keys %FAI::configs |
| 140 | } | } |
| 141 | elsif( $config =~ /^PHY_(.*)$/ ) | elsif( $config =~ /^PHY_(.*)$/ ) |
| 142 | { | { |
| 143 | foreach my $part_id ( keys $FAI::configs{ $config }{ "partitions" } ) | foreach my $part_id ( keys %{ $FAI::configs{ $config }{ "partitions" } } ) |
| 144 | { | { |
| 145 | print "$part_id configured\n"; | print "$part_id of $config configured\n"; |
| 146 | } | } |
| 147 | } | } |
| 148 | else | else |
| 149 | { | { |
| 150 | die "Internal error (invalid config entry).\n"; | warn "Internal error (invalid config entry $config).\n"; |
| 151 | } | } |
| 152 | } | } |
| 153 |
|
||||||||
| ViewVC Help | |
| Powered by ViewVC 1.1.5 |