diff options
| author | Sebastien Helleu <flashcode@flashtux.org> | 2009-03-18 15:11:18 +0100 |
|---|---|---|
| committer | Sebastien Helleu <flashcode@flashtux.org> | 2009-03-18 15:11:18 +0100 |
| commit | a938ef736a3f2da17aecc73d21f5a1acb611b5cf (patch) | |
| tree | b98eeb95e778f7f508a3769556851ea1c0aa826a /src/plugins/scripts/perl/weechat-perl-api.c | |
| parent | 763f030ae876a31f8412590d1386d21dfe1e27b8 (diff) | |
| download | weechat-a938ef736a3f2da17aecc73d21f5a1acb611b5cf.zip | |
Remove some messages during startup about scripts and plugins loaded
It is still possible to see messages by changing debug level for "core" or
plugins (perl, python, ruby, lua, tcl).
Diffstat (limited to 'src/plugins/scripts/perl/weechat-perl-api.c')
| -rw-r--r-- | src/plugins/scripts/perl/weechat-perl-api.c | 13 |
1 files changed, 8 insertions, 5 deletions
diff --git a/src/plugins/scripts/perl/weechat-perl-api.c b/src/plugins/scripts/perl/weechat-perl-api.c index 192e3ed2e..e38361d65 100644 --- a/src/plugins/scripts/perl/weechat-perl-api.c +++ b/src/plugins/scripts/perl/weechat-perl-api.c @@ -104,17 +104,20 @@ static XS (XS_weechat_api_register) /* register script */ perl_current_script = script_add (weechat_perl_plugin, - &perl_scripts, + &perl_scripts, &last_perl_script, (perl_current_script_filename) ? perl_current_script_filename : "", name, author, version, license, description, shutdown_func, charset); if (perl_current_script) { - weechat_printf (NULL, - weechat_gettext ("%s: registered script \"%s\", " - "version %s (%s)"), - PERL_PLUGIN_NAME, name, version, description); + if ((weechat_perl_plugin->debug >= 1) || !perl_quiet) + { + weechat_printf (NULL, + weechat_gettext ("%s: registered script \"%s\", " + "version %s (%s)"), + PERL_PLUGIN_NAME, name, version, description); + } } else { |