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