Исправлены синтаксические ошибки

This commit is contained in:
eleksir
2022-03-27 19:03:41 +03:00
parent 1229199ddc
commit 7ddd97710c

View File

@@ -97,7 +97,7 @@ my $parse_message = sub {
} else { } else {
$reply = trim (Fortune ()); $reply = trim (Fortune ());
} }
} elsif (length ($cmd) >= length ('karma ') && substr ($cmd, 0, length ('karma ') eq 'karma ') { } elsif (length ($cmd) >= length ('karma ') && substr ($cmd, 0, length ('karma ') eq 'karma ')) {
# По-умолчанию достаём карму пустоты # По-умолчанию достаём карму пустоты
my $text = undef; my $text = undef;
@@ -106,7 +106,7 @@ my $parse_message = sub {
} }
$reply = KarmaGet ($m->{chatid}, $text); $reply = KarmaGet ($m->{chatid}, $text);
} elsif (length ($cmd) >= length ('карма ') && substr ($cmd, 0, length ('карма ') eq 'карма ') { } elsif (length ($cmd) >= length ('карма ') && substr ($cmd, 0, length ('карма ') eq 'карма ')) {
# По-умолчанию достаём карму пустоты # По-умолчанию достаём карму пустоты
my $text = undef; my $text = undef;