summaryrefslogtreecommitdiff
path: root/src/perl/common/Core.xs
diff options
context:
space:
mode:
authorTimo Sirainen <cras@irssi.org>2001-01-06 21:59:28 +0000
committercras <cras@dbcabf3a-b0e7-0310-adc4-f8d773084564>2001-01-06 21:59:28 +0000
commit341cd555872d49a805e8271e5c4b4bdee03bb866 (patch)
treedfee61d174e6cda35aded9fd0f5547beb052ee13 /src/perl/common/Core.xs
parentd108026a377aae45a9294b495b81b951b5d84e85 (diff)
downloadirssi-341cd555872d49a805e8271e5c4b4bdee03bb866.zip
Perl updates. Lots of updates to perl documentation :)
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@1081 dbcabf3a-b0e7-0310-adc4-f8d773084564
Diffstat (limited to 'src/perl/common/Core.xs')
-rw-r--r--src/perl/common/Core.xs3
1 files changed, 1 insertions, 2 deletions
diff --git a/src/perl/common/Core.xs b/src/perl/common/Core.xs
index 52b3a0b7..dab69e94 100644
--- a/src/perl/common/Core.xs
+++ b/src/perl/common/Core.xs
@@ -318,12 +318,11 @@ PPCODE:
}
void
-command_bind(cmd, category, func)
+command_bind(cmd, func, category = "Perl scripts' commands")
char *cmd
char *category
char *func
CODE:
- if (*category == '\0') category = "Perl scripts' commands";
perl_command_bind(cmd, category, func);
void