… | … | ||
---|---|---|---|
69 | del $pl->ob->name; | 69 | del $pl->ob->name; |
70 | }, | 70 | }, |
71 | on_birth => sub { | 71 | on_birth => sub { |
72 | my ($pl) = @_; | 72 | my ($pl) = @_; |
73 | $pl = $pl->ob; | 73 | $pl = $pl->ob; |
74 | upd $pl->name, NT_PLAYER, $pl->count, $pl->ob->uuid; | 74 | upd $pl->name, NT_PLAYER, $pl->count, $pl->uuid; |
75 | }, | 75 | }, |
76 | on_quit => sub { | 76 | on_quit => sub { |
77 | my ($pl) = @_; | 77 | my ($pl) = @_; |
78 | del $pl->ob->name; | 78 | del $pl->ob->name; |
79 | }, | 79 | }, |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |