| 1 | #! perl # MANDATORY | 1 | #! perl # mandatory |
|---|---|---|---|
| 2 | 2 | ||
| 3 | cf::map->register (qr{^\{link\}}); | 3 | cf::map->register (qr{^\{link\}}); |
| 4 | 4 | ||
| 5 | sub load_header { | 5 | sub load_header { |
| 6 | my ($self) = @_; | 6 | my ($self) = @_; |
| … | … | ||
| 33 | $self->insert ($exit->clone, 11, 11); | 33 | $self->insert ($exit->clone, 11, 11); |
| 34 | 34 | ||
| 35 | $self->{deny_save} = 1; | 35 | $self->{deny_save} = 1; |
| 36 | $self->{deny_reset} = 1; | 36 | $self->{deny_reset} = 1; |
| 37 | 37 | ||
| 38 | $self->activate; | ||
| 39 | |||
| 38 | 1 | 40 | 1 |
| 39 | } | 41 | } |
| 40 | 42 | ||
| 41 | 1 | 43 | 1 |
| 42 | 44 |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |