| … | |
… | |
| 2091 | { |
2091 | { |
| 2092 | my $lock = cf::lock_acquire "map_data:$self->{path}"; |
2092 | my $lock = cf::lock_acquire "map_data:$self->{path}"; |
| 2093 | |
2093 | |
| 2094 | delete $cf::MAP{$self->path}; |
2094 | delete $cf::MAP{$self->path}; |
| 2095 | |
2095 | |
|
|
2096 | $self->unlink_save; |
|
|
2097 | |
| 2096 | bless $self, "cf::map"; |
2098 | bless $self, "cf::map"; |
| 2097 | delete $self->{deny_reset}; |
2099 | delete $self->{deny_reset}; |
| 2098 | $self->{deny_save} = 1; |
2100 | $self->{deny_save} = 1; |
| 2099 | $self->reset_timeout (1); |
2101 | $self->reset_timeout (1); |
| 2100 | $self->path ($self->{path} = "{nuke}/" . ($nuke_counter++)); |
2102 | $self->path ($self->{path} = "{nuke}/" . ($nuke_counter++)); |
| 2101 | |
|
|
| 2102 | $self->unlink_save; |
|
|
| 2103 | |
2103 | |
| 2104 | $cf::MAP{$self->path} = $self; |
2104 | $cf::MAP{$self->path} = $self; |
| 2105 | } |
2105 | } |
| 2106 | |
2106 | |
| 2107 | $self->reset; # polite request, might not happen |
2107 | $self->reset; # polite request, might not happen |
