… | |
… | |
2276 | my ($ref) = @_; |
2276 | my ($ref) = @_; |
2277 | |
2277 | |
2278 | # temporary compatibility#TODO#remove |
2278 | # temporary compatibility#TODO#remove |
2279 | $ref =~ s{^<}{player/<}; |
2279 | $ref =~ s{^<}{player/<}; |
2280 | |
2280 | |
2281 | if ($ref =~ m{^player\/(<1\.\d+>)/(.*)$}) { |
2281 | if ($ref =~ m{^player\/(<1\.[0-9a-f]+>)/(.*)$}) { |
2282 | my ($uuid, $name) = ($1, $2); |
2282 | my ($uuid, $name) = ($1, $2); |
2283 | my $pl = $cf::PLAYER_LOADING{$name} || cf::player::find $name |
2283 | my $pl = $cf::PLAYER_LOADING{$name} || cf::player::find $name |
2284 | or return; |
2284 | or return; |
2285 | $pl->ob->uuid eq $uuid |
2285 | $pl->ob->uuid eq $uuid |
2286 | or return; |
2286 | or return; |