diff --git a/lib/Phrases.pm b/lib/Phrases.pm index 19390d6..897968b 100644 --- a/lib/Phrases.pm +++ b/lib/Phrases.pm @@ -97,7 +97,7 @@ my $parse_message = sub { } else { $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; @@ -106,7 +106,7 @@ my $parse_message = sub { } $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;