diff options
Diffstat (limited to 'src/perl/xs/Irssi-core.xs')
| -rw-r--r-- | src/perl/xs/Irssi-core.xs | 10 |
1 files changed, 1 insertions, 9 deletions
diff --git a/src/perl/xs/Irssi-core.xs b/src/perl/xs/Irssi-core.xs index 324637ae..d8a87c50 100644 --- a/src/perl/xs/Irssi-core.xs +++ b/src/perl/xs/Irssi-core.xs @@ -90,16 +90,8 @@ CODE: char *signal; GSList *tmp; - /* Don't add the command twice */ if (*category == '\0') category = "Perl scripts' commands"; - for (tmp = commands; tmp != NULL; tmp = tmp->next) { - COMMAND_REC *rec = tmp->data; - - if (g_strcasecmp(rec->cmd, cmd) == 0 && - g_strcasecmp(rec->category, category) == 0) - break; - } - if (tmp == NULL) command_bind(cmd, category, NULL); + command_bind(cmd, category, NULL); signal = g_strconcat("command ", cmd, NULL); perl_signal_add(signal, func); g_free(signal); |