From 32f26d0ff5e07faedb3b7fe44fec61ab7b3ec041 Mon Sep 17 00:00:00 2001 From: Timo Sirainen Date: Mon, 19 Nov 2001 22:47:32 +0000 Subject: [PATCH] perl_command() - just a small sanity check that we're not sending empty command. git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2106 dbcabf3a-b0e7-0310-adc4-f8d773084564 --- src/perl/perl-common.c | 3 +++ 1 file changed, 3 insertions(+) diff --git a/src/perl/perl-common.c b/src/perl/perl-common.c index 8de38ad0..a57c81e8 100644 --- a/src/perl/perl-common.c +++ b/src/perl/perl-common.c @@ -453,6 +453,9 @@ void perl_command(const char *cmd, SERVER_REC *server, WI_ITEM_REC *item) const char *cmdchars; char *sendcmd = (char *) cmd; + if (*cmd == '\0') + return; + cmdchars = settings_get_str("cmdchars"); if (strchr(cmdchars, *cmd) == NULL) { /* no command char - let's put it there.. */