| … | … | ||
|---|---|---|---|
| 507 | } | 507 | } |
| 508 | return $delta_costs | 508 | return $delta_costs |
| 509 | } | 509 | } |
| 510 | 510 | ||
| 511 | sub on_player_use_skill { | 511 | sub on_player_use_skill { |
| 512 | return 0; # disabled not yet ready#d##TODO# | ||
| 512 | my ($ob, $part, $sk, $dir, $msg) = @_; | 513 | my ($ob, $part, $sk, $dir, $msg) = @_; |
| 513 | my $pl = $ob; | 514 | my $pl = $ob; |
| 514 | 515 | ||
| 515 | my $skobj = $sk; | 516 | my $skobj = $sk; |
| 516 | 517 |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |