--- deliantra/server/ext/transports.ext 2007/02/03 21:41:06 1.3 +++ deliantra/server/ext/transports.ext 2007/05/18 19:46:22 1.4 @@ -38,6 +38,9 @@ my $ob = $pl->ob; if (my $tr = find_transport $pl) { + return cf::override 0 unless $ob->speed_left >= 0; + $ob->speed_left ($ob->speed_left - 1); + my @ontop; for (my $tr = $tr; $tr; $tr = $tr->more) { @@ -56,7 +59,7 @@ } } - cf::override; + cf::override 1; } }, ;