| … | |
… | |
| 107 | |
107 | |
| 108 | $portal->free; |
108 | $portal->free; |
| 109 | } |
109 | } |
| 110 | |
110 | |
| 111 | sub on_trigger { |
111 | sub on_trigger { |
| 112 | my ($event) = @_; |
112 | my ($event, $porter, $ob) = @_; |
|
|
113 | |
| 113 | my $options = $event->{options}; |
114 | my $options = $event->options; |
| 114 | my $ob = $event->{activator}; |
|
|
| 115 | my $pl = $ob->contr; |
115 | my $pl = $ob->contr; |
| 116 | my @savebed; |
116 | my @savebed; |
| 117 | |
117 | |
| 118 | if (my $save = delete $ob->{in_nimbus}) { |
118 | if (my $save = delete $ob->{in_nimbus}) { |
| 119 | @savebed = @{$save->{savebed}}; |
119 | @savebed = @{$save->{savebed}}; |
