[Исправлено] ошибка в консольной команде move

BugTraq: обнаруженные ошибки и обсуждение их устранения.

Модератор: 4epT

Аватара пользователя
4epT
macro-маньячина
Сообщения: 2792
Зарегистрирован: Чт дек 21, 2006 1:23 pm
Сервер RO:: 4game
Discord: ya4ept#8494
Контактная информация:

[Исправлено] ошибка в консольной команде move

Сообщение 4epT »

OpenKore версия самая свежая на 27.11.2010 скачана с http://openkore.collectskin.com/

стою в нубзоне:
Локация: (new_3-1) : (baseName: new_zone01) : 110, 111
даю команду: move 109 111, мне карасным по чёрному пишется:
move 109 111
Локации new_zone01 не существует.
кору в руках давно не держал и что за нововведение с "$field->baseName" в душе не знаю..
Вылечил сей косяк, как мог (не знаю правильно ли это или нет):
в файле Commands.pm ищем код:

Код: Выделить всё

sub cmdMove {
	if (!$net || $net->getState() != Network::IN_GAME) {
		error TF("You must be logged in the game to use this command (%s)\n", shift);
		return;
	}
	my (undef, $args) = @_;
	my ($arg1, $arg2, $arg3) = $args =~ /^(.+?) (.+?)(?: (.*))?$/;

	my ($map, $x, $y);
	if ($arg1 eq "") {
		# map name or portal number
		$map = $args;
	} elsif ($arg3 eq "") {
		# coordinates
		$x = $arg1;
		$y = $arg2;
		$map = $field->baseName;
	} elsif ($arg1 =~ /^\d+$/) {
		# coordinates and map
		$x = $arg1;
		$y = $arg2;
		$map = $arg3;
	} else {
		# map and coordinates
		$x = $arg2;
		$y = $arg3;
		$map = $arg1;
	}
и заменяем строчку "$map = $field->baseName;" и меняем её на:

Код: Выделить всё

$map = $field->name;
теперь команда move в нубзоне работает как раньше!

Просьба тем у кого есть доступ в SVN - исправить.
:beer:
Быстро и качественно напишу конфиг (макрос)! Стучи!
¤ Свежий бот ¤ Config checker ¤ Manual ¤
Изображение
Изображение
EternalHarvest
Разработчик
Сообщения: 819
Зарегистрирован: Пн окт 27, 2008 9:49 pm

Re: ошибка в консольной команде move

Сообщение EternalHarvest »

r7574.
Ответить