summaryrefslogtreecommitdiff
path: root/src/perl
diff options
context:
space:
mode:
authorailin-nemui <ailin-nemui@users.noreply.github.com>2016-10-31 15:15:45 +0100
committerGitHub <noreply@github.com>2016-10-31 15:15:45 +0100
commit1652c8a561486c630e573002af7d43a34915c871 (patch)
tree582199846e88cf93228f42740ac6e08933869979 /src/perl
parentfb78787d4e2098612979b45df3237b67effbbc3a (diff)
parentbc4e2c9ade41182ff643a94bbcb72ffe86b0e67c (diff)
downloadirssi-1652c8a561486c630e573002af7d43a34915c871.zip
Merge pull request #557 from irssi/ahf/tls-pr
TLS enhancements
Diffstat (limited to 'src/perl')
-rwxr-xr-xsrc/perl/get-signals.pl1
-rw-r--r--src/perl/perl-common.c3
2 files changed, 3 insertions, 1 deletions
diff --git a/src/perl/get-signals.pl b/src/perl/get-signals.pl
index 529d35b1..806bcafa 100755
--- a/src/perl/get-signals.pl
+++ b/src/perl/get-signals.pl
@@ -37,6 +37,7 @@ while (<STDIN>) {
RAWLOG_REC => 'Irssi::Rawlog',
IGNORE_REC => 'Irssi::Ignore',
MODULE_REC => 'Irssi::Module',
+ TLS_REC => 'iobject',
# irc
BAN_REC => 'Irssi::Irc::Ban',
diff --git a/src/perl/perl-common.c b/src/perl/perl-common.c
index b641867f..1d08319f 100644
--- a/src/perl/perl-common.c
+++ b/src/perl/perl-common.c
@@ -301,7 +301,8 @@ void perl_connect_fill_hash(HV *hv, SERVER_CONNECT_REC *conn)
(void) hv_store(hv, "no_autojoin_channels", 20, newSViv(conn->no_autojoin_channels), 0);
(void) hv_store(hv, "no_autosendcmd", 14, newSViv(conn->no_autosendcmd), 0);
(void) hv_store(hv, "unix_socket", 11, newSViv(conn->unix_socket), 0);
- (void) hv_store(hv, "use_ssl", 7, newSViv(conn->use_ssl), 0);
+ (void) hv_store(hv, "use_ssl", 7, newSViv(conn->use_tls), 0);
+ (void) hv_store(hv, "use_tls", 7, newSViv(conn->use_tls), 0);
(void) hv_store(hv, "no_connect", 10, newSViv(conn->no_connect), 0);
}