--- deliantra/server/ext/follow.ext 2007/01/01 21:19:52 1.4 +++ deliantra/server/ext/follow.ext 2007/01/02 08:26:41 1.5 @@ -15,7 +15,7 @@ my ($who, $other) = (cf::player::find $name, cf::player::find $target); if ($who && $other && $other->ob->map) { - my ($map, $x, $y) = ($other->ob->map, $other->ob->x, $other->ob->y); + my ($map, $x, $y) = ($other->ob->map->path, $other->ob->x, $other->ob->y); if ($map ne $his->[0] || $x != $his->[1] || $y != $his->[2]) { @$mine = @$his; @@ -49,7 +49,7 @@ if ($args ne "" && $name ne $args) { if (my $other = cf::player::find $args) { - if ($other->ob->map->path eq $who->map->path + if ($other->ob->map eq $who->map && abs ($other->ob->x - $who->x) <= 1 && abs ($other->ob->y - $who->y) <= 1) { $who->message ("Following player '$args', to stop, type: 'follow");