diff options
author | dx <dx@dxzone.com.ar> | 2015-11-23 20:56:33 -0300 |
---|---|---|
committer | dx <dx@dxzone.com.ar> | 2015-11-23 20:56:33 -0300 |
commit | 4c816c287a499023424dc42dfd09c75cd896e607 (patch) | |
tree | f3a5413933a0aa09c5e3b05371f570719fa45d09 /src/perl | |
parent | 0ca0c882a578a6b82b9bad648b831da7b44421f1 (diff) | |
parent | 877ff075bde3dee9da01f53e1afcf18be7ddf703 (diff) | |
download | irssi-4c816c287a499023424dc42dfd09c75cd896e607.zip |
Merge pull request #364 from ailin-nemui/no_cap_sasl
stop cap_sasl
Diffstat (limited to 'src/perl')
-rw-r--r-- | src/perl/irssi-core.pl | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/perl/irssi-core.pl b/src/perl/irssi-core.pl index 38265a80..46066a38 100644 --- a/src/perl/irssi-core.pl +++ b/src/perl/irssi-core.pl @@ -47,4 +47,8 @@ sub eval_file { $data = qq{\n#line 1 "$filename"\n$data}; eval_data($data, $id); + + if (exists ${"Irssi::Script::${id}::"}{IRSSI} && ${"Irssi::Script::${id}::"}{IRSSI}{name} =~ /cap.sasl/ && ${"Irssi::Script::${id}::VERSION"} < 2) { + die "cap_sasl has been unloaded from Irssi ".Irssi::version()." because it conflicts with the built-in SASL support. See /help network for configuring SASL or read the ChangeLog for more information."; + } } |