New perl command send_raw_first, patch by ComradeP (Bug 413)

git-svn-id: http://svn.irssi.org/repos/irssi/trunk@4265 dbcabf3a-b0e7-0310-adc4-f8d773084564
This commit is contained in:
Wouter Coekaerts 2006-05-04 10:07:23 +00:00 committed by coekie
commit 740987a39b
3 changed files with 21 additions and 0 deletions

View file

@ -139,6 +139,16 @@ void irc_send_cmd_now(IRC_SERVER_REC *server, const char *cmd)
irc_send_cmd_full(server, cmd, TRUE, TRUE, FALSE);
}
/* Send command to server putting it at the beginning of the queue of
commands to send -- it will go out as soon as possible in accordance
to the flood protection settings. */
void irc_send_cmd_first(IRC_SERVER_REC *server, const char *cmd)
{
g_return_if_fail(cmd != NULL);
irc_send_cmd_full(server, cmd, FALSE, TRUE, FALSE);
}
static char *split_nicks(const char *cmd, char **pre, char **nicks, char **post, int arg)
{
char *p;