| … | |
… | |
| 106 | |
106 | |
| 107 | my $exit = $MAP_EXITS{$map->path} ||= find_exits $map; |
107 | my $exit = $MAP_EXITS{$map->path} ||= find_exits $map; |
| 108 | prefetch map => $_ for @$exit; |
108 | prefetch map => $_ for @$exit; |
| 109 | } |
109 | } |
| 110 | |
110 | |
| 111 | cf::attach_to_players prio => -900, |
111 | cf::player->attach ( |
|
|
112 | prio => -900, |
| 112 | on_map_change => sub { |
113 | on_map_change => sub { |
| 113 | my ($pl, $new, $x, $x) = @_; |
114 | my ($pl, $new, $x, $x) = @_; |
| 114 | |
115 | |
| 115 | prefetch_map $new; |
116 | prefetch_map $new; |
| 116 | }, |
117 | }, |
| 117 | ; |
118 | ); |
| 118 | |
119 | |
| 119 | if (0) { #test# |
120 | if (0) { #test# |
| 120 | # prefetch a few players/second |
121 | # prefetch a few players/second |
| 121 | { |
122 | { |
| 122 | my @players; |
123 | my @players; |
