diff options
author | Matt Caswell <matt@openssl.org> | 2016-12-08 09:44:06 +0000 |
---|---|---|
committer | Matt Caswell <matt@openssl.org> | 2016-12-08 17:21:35 +0000 |
commit | 9615387408f355dc0620c1ab797a16ae7e72d722 (patch) | |
tree | 1d2727f93f4a7015791c2a2dc637d6759d144b06 /util | |
parent | 1e566129ad8f7c7901b7beccd6128d37e063d2c7 (diff) |
Fix various indentation
The indentation was a bit off in some of the perl files following the
extensions refactor.
Perl changes reviewed by Richard Levitte. Non-perl changes reviewed by Rich
Salz
Reviewed-by: Rich Salz <rsalz@openssl.org>
Reviewed-by: Richard Levitte <levitte@openssl.org>
Diffstat (limited to 'util')
-rw-r--r-- | util/TLSProxy/EncryptedExtensions.pm | 8 | ||||
-rw-r--r-- | util/TLSProxy/Proxy.pm | 26 |
2 files changed, 17 insertions, 17 deletions
diff --git a/util/TLSProxy/EncryptedExtensions.pm b/util/TLSProxy/EncryptedExtensions.pm index 82e6c5e5c7..81242e29ff 100644 --- a/util/TLSProxy/EncryptedExtensions.pm +++ b/util/TLSProxy/EncryptedExtensions.pm @@ -82,9 +82,9 @@ sub set_message_contents $extensions .= pack("n", length($extdata)); $extensions .= $extdata; if ($key == TLSProxy::Message::EXT_DUPLICATE_EXTENSION) { - $extensions .= pack("n", $key); - $extensions .= pack("n", length($extdata)); - $extensions .= $extdata; + $extensions .= pack("n", $key); + $extensions .= pack("n", length($extdata)); + $extensions .= $extdata; } } @@ -98,7 +98,7 @@ sub extension_data { my $self = shift; if (@_) { - $self->{extension_data} = shift; + $self->{extension_data} = shift; } return $self->{extension_data}; } diff --git a/util/TLSProxy/Proxy.pm b/util/TLSProxy/Proxy.pm index 37abfb03e9..65615891f8 100644 --- a/util/TLSProxy/Proxy.pm +++ b/util/TLSProxy/Proxy.pm @@ -410,7 +410,7 @@ sub proxy_addr { my $self = shift; if (@_) { - $self->{proxy_addr} = shift; + $self->{proxy_addr} = shift; } return $self->{proxy_addr}; } @@ -418,7 +418,7 @@ sub proxy_port { my $self = shift; if (@_) { - $self->{proxy_port} = shift; + $self->{proxy_port} = shift; } return $self->{proxy_port}; } @@ -426,7 +426,7 @@ sub server_addr { my $self = shift; if (@_) { - $self->{server_addr} = shift; + $self->{server_addr} = shift; } return $self->{server_addr}; } @@ -434,7 +434,7 @@ sub server_port { my $self = shift; if (@_) { - $self->{server_port} = shift; + $self->{server_port} = shift; } return $self->{server_port}; } @@ -442,7 +442,7 @@ sub filter { my $self = shift; if (@_) { - $self->{filter} = shift; + $self->{filter} = shift; } return $self->{filter}; } @@ -450,7 +450,7 @@ sub cipherc { my $self = shift; if (@_) { - $self->{cipherc} = shift; + $self->{cipherc} = shift; } return $self->{cipherc}; } @@ -458,7 +458,7 @@ sub ciphers { my $self = shift; if (@_) { - $self->{ciphers} = shift; + $self->{ciphers} = shift; } return $self->{ciphers}; } @@ -466,7 +466,7 @@ sub serverflags { my $self = shift; if (@_) { - $self->{serverflags} = shift; + $self->{serverflags} = shift; } return $self->{serverflags}; } @@ -474,7 +474,7 @@ sub clientflags { my $self = shift; if (@_) { - $self->{clientflags} = shift; + $self->{clientflags} = shift; } return $self->{clientflags}; } @@ -482,7 +482,7 @@ sub serverconnects { my $self = shift; if (@_) { - $self->{serverconnects} = shift; + $self->{serverconnects} = shift; } return $self->{serverconnects}; } @@ -502,7 +502,7 @@ sub serverpid { my $self = shift; if (@_) { - $self->{serverpid} = shift; + $self->{serverpid} = shift; } return $self->{serverpid}; } @@ -521,7 +521,7 @@ sub is_tls13 { my $class = shift; if (@_) { - $is_tls13 = shift; + $is_tls13 = shift; } return $is_tls13; } @@ -530,7 +530,7 @@ sub reneg { my $self = shift; if (@_) { - $self->{reneg} = shift; + $self->{reneg} = shift; } return $self->{reneg}; } |