| … | |
… | |
| 2344 | } |
2344 | } |
| 2345 | |
2345 | |
| 2346 | =item cf::map::static_maps |
2346 | =item cf::map::static_maps |
| 2347 | |
2347 | |
| 2348 | Returns an arrayref if paths of all static maps (all preinstalled F<.map> |
2348 | Returns an arrayref if paths of all static maps (all preinstalled F<.map> |
| 2349 | file in the shared directory excluding F</styles>). May block. |
2349 | file in the shared directory excluding F</styles> and F</editor>). May |
|
|
2350 | block. |
| 2350 | |
2351 | |
| 2351 | =cut |
2352 | =cut |
| 2352 | |
2353 | |
| 2353 | sub static_maps() { |
2354 | sub static_maps() { |
| 2354 | my @dirs = ""; |
2355 | my @dirs = ""; |
| 2355 | my @maps; |
2356 | my @maps; |
| 2356 | |
2357 | |
| 2357 | while (@dirs) { |
2358 | while (@dirs) { |
| 2358 | my $dir = shift @dirs; |
2359 | my $dir = shift @dirs; |
| 2359 | |
2360 | |
| 2360 | next if $dir eq "/styles"; |
2361 | next if $dir eq "/styles" || $dir eq "/editor"; |
| 2361 | |
2362 | |
| 2362 | my ($dirs, $files) = Coro::AIO::aio_scandir "$MAPDIR$dir", 2 |
2363 | my ($dirs, $files) = Coro::AIO::aio_scandir "$MAPDIR$dir", 2 |
| 2363 | or return; |
2364 | or return; |
| 2364 | |
2365 | |
| 2365 | for (@$files) { |
2366 | for (@$files) { |
