… | |
… | |
1535 | Coro::cede; |
1535 | Coro::cede; |
1536 | $self->activate; |
1536 | $self->activate; |
1537 | } |
1537 | } |
1538 | |
1538 | |
1539 | $self->in_memory (cf::MAP_IN_MEMORY); |
1539 | $self->in_memory (cf::MAP_IN_MEMORY); |
1540 | |
|
|
1541 | undef $guard; |
|
|
1542 | } |
1540 | } |
1543 | |
1541 | |
1544 | $self->post_load; |
1542 | $self->post_load; |
1545 | } |
1543 | } |
1546 | |
1544 | |
… | |
… | |
1863 | $LINK_MAP |
1861 | $LINK_MAP |
1864 | } |
1862 | } |
1865 | |
1863 | |
1866 | sub cf::object::player::enter_link { |
1864 | sub cf::object::player::enter_link { |
1867 | my ($self) = @_; |
1865 | my ($self) = @_; |
1868 | |
|
|
1869 | $self->deactivate_recursive; |
|
|
1870 | |
1866 | |
1871 | return if UNIVERSAL::isa $self->map, "ext::map_link"; |
1867 | return if UNIVERSAL::isa $self->map, "ext::map_link"; |
1872 | |
1868 | |
1873 | $self->{_link_pos} ||= [$self->map->{path}, $self->x, $self->y] |
1869 | $self->{_link_pos} ||= [$self->map->{path}, $self->x, $self->y] |
1874 | if $self->map; |
1870 | if $self->map; |