nhyatt/putty-source
1
0
Fork 0
mirror of https://git.tartarus.org/simon/putty.git synced 2025-01-10 01:48:00 +00:00
Code Issues Projects Releases Wiki Activity

logparse.pl: fix a Perl warning.

Browse Source 
Used the wrong kind of brackets when initialising the actual hash (as
opposed to hash ref) %disc_reasons. Not sure how I didn't notice the
warning in yesterday's testing!
This commit is contained in:
Simon Tatham 2018-04-11 19:58:14 +01:00
parent 4989447e72
commit f41d365029
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
contrib/logparse.pl
View File

@ -545,7 +545,7 @@ my %packets = (
}, },
); );
our %disc_reasons = { our %disc_reasons = (
1 => "SSH_DISCONNECT_HOST_NOT_ALLOWED_TO_CONNECT", 1 => "SSH_DISCONNECT_HOST_NOT_ALLOWED_TO_CONNECT",
2 => "SSH_DISCONNECT_PROTOCOL_ERROR", 2 => "SSH_DISCONNECT_PROTOCOL_ERROR",
3 => "SSH_DISCONNECT_KEY_EXCHANGE_FAILED", 3 => "SSH_DISCONNECT_KEY_EXCHANGE_FAILED",
@ -561,7 +561,7 @@ our %disc_reasons = {
13 => "SSH_DISCONNECT_AUTH_CANCELLED_BY_USER", 13 => "SSH_DISCONNECT_AUTH_CANCELLED_BY_USER",
14 => "SSH_DISCONNECT_NO_MORE_AUTH_METHODS_AVAILABLE", 14 => "SSH_DISCONNECT_NO_MORE_AUTH_METHODS_AVAILABLE",
15 => "SSH_DISCONNECT_ILLEGAL_USER_NAME", 15 => "SSH_DISCONNECT_ILLEGAL_USER_NAME",
}; );
my %verbose_packet_dump_functions = ( my %verbose_packet_dump_functions = (
'SSH2_MSG_KEXINIT' => sub { 'SSH2_MSG_KEXINIT' => sub {