| … | … | ||
|---|---|---|---|
| 23 | 23 | ||
| 24 | sub on_player_death { | 24 | sub on_player_death { |
| 25 | my ($ob) = @_; | 25 | my ($ob) = @_; |
| 26 | 26 | ||
| 27 | cf::LOG cf::llevDebug, sprintf "QBERT %s died a quick and not very horrible death\n", | 27 | cf::LOG cf::llevDebug, sprintf "QBERT %s died a quick and not very horrible death\n", |
| 28 | $ob; | 28 | $ob->name; |
| 29 | } | 29 | } |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |