… | |
… | |
1456 | |
1456 | |
1457 | undef $MAP_PREFETCH{$path}; |
1457 | undef $MAP_PREFETCH{$path}; |
1458 | $MAP_PREFETCHER ||= cf::async { |
1458 | $MAP_PREFETCHER ||= cf::async { |
1459 | while (%MAP_PREFETCH) { |
1459 | while (%MAP_PREFETCH) { |
1460 | for my $path (keys %MAP_PREFETCH) { |
1460 | for my $path (keys %MAP_PREFETCH) { |
1461 | warn "prefetching $path...\n";#d# |
|
|
1462 | my $map = find $path |
1461 | my $map = find $path |
1463 | or next; |
1462 | or next; |
1464 | $map->load; |
1463 | $map->load; |
1465 | |
1464 | |
1466 | delete $MAP_PREFETCH{$path}; |
1465 | delete $MAP_PREFETCH{$path}; |