From: simon <simon@cda61777-01e9-0310-a592-d414129be87e>
Date: Mon, 30 Apr 2012 17:28:28 +0000 (+0000)
Subject: Fix trivial Perl goof in logparse.pl which caused
X-Git-Url: https://git.distorted.org.uk/u/mdw/putty/commitdiff_plain/142228d2e0cc0729b6527a00c56a6e38edb290c1?ds=sidebyside

Fix trivial Perl goof in logparse.pl which caused
SSH2_MSG_CHANNEL_FAILURE to be reported as replying to
ARRAY(0xrubbish) instead of to a message number.


git-svn-id: svn://svn.tartarus.org/sgt/putty@9472 cda61777-01e9-0310-a592-d414129be87e
---

diff --git a/contrib/logparse.pl b/contrib/logparse.pl
index 29043bae..a3d82840 100755
--- a/contrib/logparse.pl
+++ b/contrib/logparse.pl
@@ -414,7 +414,7 @@ my %packets = (
         my $otherdir = ($direction eq "i" ? "o" : "i");
         my $request = shift @{$chan->{'requests_' . $otherdir}};
         if (defined $request) {
-            printf " to %s", $request;
+            printf " to %s", $request->[0];
         } else {
             print " (spurious?)";
         }