summaryrefslogtreecommitdiff
path: root/src/perl/perl-fe.c
diff options
context:
space:
mode:
authorTimo Sirainen <cras@irssi.org>2001-10-23 20:49:17 +0000
committercras <cras@dbcabf3a-b0e7-0310-adc4-f8d773084564>2001-10-23 20:49:17 +0000
commit3f578b4b536f5cbe54a08b2895f5bd26a7e40975 (patch)
tree2ce168444c68241a7728acaf7f587d3e3ce664de /src/perl/perl-fe.c
parent62c6a35aeb46e89f5ff6764e4472aabae31031e4 (diff)
downloadirssi-3f578b4b536f5cbe54a08b2895f5bd26a7e40975.zip
/SCRIPT without parameters now prints list of loaded scripts.
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@1901 dbcabf3a-b0e7-0310-adc4-f8d773084564
Diffstat (limited to 'src/perl/perl-fe.c')
-rw-r--r--src/perl/perl-fe.c3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/perl/perl-fe.c b/src/perl/perl-fe.c
index ee19c5a2..17b57ee1 100644
--- a/src/perl/perl-fe.c
+++ b/src/perl/perl-fe.c
@@ -32,6 +32,9 @@
static void cmd_script(const char *data, SERVER_REC *server, void *item)
{
+ if (*data == '\0')
+ data = "list";
+
command_runsub("script", data, server, item);
}