… | |
… | |
120 | |
120 | |
121 | $obs[0]->set_ob_key_value (ext_reseller_sales => cf::to_json $sells); |
121 | $obs[0]->set_ob_key_value (ext_reseller_sales => cf::to_json $sells); |
122 | }, |
122 | }, |
123 | ; |
123 | ; |
124 | |
124 | |
125 | cf::register "reseller_floor", |
125 | cf::register_attachment "reseller_floor", |
126 | on_drop_on => sub { |
126 | on_drop_on => sub { |
127 | my ($on, $what, $who) = @_; |
127 | my ($on, $what, $who) = @_; |
128 | my $name = $what->custom_name; |
128 | my $name = $what->custom_name; |
129 | |
129 | |
130 | return if $what->get_flag (cf::FLAG_UNPAID); |
130 | return if $what->get_flag (cf::FLAG_UNPAID); |