Fix typo when comparing strings

Perl uses `eq` to compare strings, not `==`.

Fixes 653e934268c876ac17bafa31998b9bb67c44abb6 Replace empty server
response with "Command processed"
This commit is contained in:
Ben Peddell 2016-02-20 21:38:15 +10:00
parent 5e8b53be78
commit af216eee99

View File

@ -320,7 +320,7 @@ rconcmd() {
auth($socket, $password);
sendpkt($socket, 2, 2, $command);
my ($resid, $restype, $rcvbody) = recvpkt($socket);
if ($rcvbody == "Server received, But no response!!") {
if ($rcvbody eq "Server received, But no response!!") {
print "Command processed\n";
} else {
print $rcvbody, "\n";