| … | |
… | |
| 6 | my ($self) = @_; |
6 | my ($self) = @_; |
| 7 | |
7 | |
| 8 | $self->{random_id} = $1; |
8 | $self->{random_id} = $1; |
| 9 | |
9 | |
| 10 | if (0 < Coro::AIO::aio_load "$cf::RANDOMDIR/$self->{random_id}.meta", my $data) { |
10 | if (0 < Coro::AIO::aio_load "$cf::RANDOMDIR/$self->{random_id}.meta", my $data) { |
| 11 | $self->{random} = cf::from_json $data; |
11 | $self->{random} = cf::decode_json $data; |
| 12 | $self->{random}{custom} ||= "$self->{random}{origin_map}+$self->{random}{origin_x}+$self->{random}{origin_y}"; |
12 | $self->{random}{custom} ||= "$self->{random}{origin_map}+$self->{random}{origin_x}+$self->{random}{origin_y}"; |
| 13 | } else { |
13 | } else { |
| 14 | warn "unable to read meta file for $self->{random_id}\n"; |
14 | warn "unable to read meta file for $self->{random_id}\n"; |
| 15 | return 0; |
15 | return 0; |
| 16 | } |
16 | } |
