diff options
author | Sebastien Helleu <flashcode@flashtux.org> | 2006-05-29 22:42:07 +0000 |
---|---|---|
committer | Sebastien Helleu <flashcode@flashtux.org> | 2006-05-29 22:42:07 +0000 |
commit | 6599c523527c4679148acf62635f9846e133a898 (patch) | |
tree | cddb45e9248f74c08d2938d39ae6c2f31b33563d | |
parent | fe90f3d4e46b2899c6e21425f3eb4fb4576a156b (diff) | |
download | weechat-6599c523527c4679148acf62635f9846e133a898.zip |
Fixed /perl command output when no keyboard handler is defined
-rw-r--r-- | src/plugins/scripts/perl/weechat-perl.c | 2 | ||||
-rw-r--r-- | weechat/src/plugins/scripts/perl/weechat-perl.c | 2 |
2 files changed, 4 insertions, 0 deletions
diff --git a/src/plugins/scripts/perl/weechat-perl.c b/src/plugins/scripts/perl/weechat-perl.c index d8cb85e14..0b717b9ec 100644 --- a/src/plugins/scripts/perl/weechat-perl.c +++ b/src/plugins/scripts/perl/weechat-perl.c @@ -1679,6 +1679,8 @@ weechat_perl_cmd (t_weechat_plugin *plugin, ptr_handler->handler_args); } } + if (!handler_found) + plugin->print_server (plugin, " (none)"); break; case 1: if (plugin->ascii_strcasecmp (plugin, argv[0], "autoload") == 0) diff --git a/weechat/src/plugins/scripts/perl/weechat-perl.c b/weechat/src/plugins/scripts/perl/weechat-perl.c index d8cb85e14..0b717b9ec 100644 --- a/weechat/src/plugins/scripts/perl/weechat-perl.c +++ b/weechat/src/plugins/scripts/perl/weechat-perl.c @@ -1679,6 +1679,8 @@ weechat_perl_cmd (t_weechat_plugin *plugin, ptr_handler->handler_args); } } + if (!handler_found) + plugin->print_server (plugin, " (none)"); break; case 1: if (plugin->ascii_strcasecmp (plugin, argv[0], "autoload") == 0) |