Changeset 1207
- Timestamp:
- 08/16/08 21:05:02 (3 months ago)
- Files:
-
- trunk/utils/mogtool (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/utils/mogtool
r1202 r1207 1059 1059 1060 1060 # verify info file 1061 print "Waiting for info file replication...\n" ;1062 while ( 1) {1061 print "Waiting for info file replication...\n" unless $opts{noreplwait}; 1062 while (!$opts{noreplwait}) { 1063 1063 my @paths = $mogfs->get_paths("_big_info:$key", 1); 1064 next unless scalar(@paths) >= 2; 1064 if (@paths < 2) { 1065 select undef, undef, undef, 0.25; 1066 next; 1067 } 1065 1068 foreach my $path (@paths) { 1066 1069 my $data = get($path);
