From 2f64188ced9c0ad9b31bb12ea8aa453cb35f549f Mon Sep 17 00:00:00 2001
From: Sam Hartman <hartmans@debian.org>
Date: Wed, 3 Sep 2014 16:35:30 -0400
Subject: [PATCH] Include connection keep-alive

---
 test/gssweb_client.pl | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/test/gssweb_client.pl b/test/gssweb_client.pl
index 1db407f..48dab76 100755
--- a/test/gssweb_client.pl
+++ b/test/gssweb_client.pl
@@ -2,6 +2,7 @@
 
 use strict;
 use WWW::Mechanize;
+    use LWP::ConnCache;
 use GSSAPI;
 use GSSAPI::OID;
 use MIME::Base64;
@@ -49,6 +50,7 @@ sub token_body($$) {
 
 my ($url, $gssname) = @ARGV;
 my $www = WWW::Mechanize->new('autocheck' => 0);
+$www->conn_cache(LWP::ConnCache->new);
 my $done = 0;
 my $response_token = undef;
    while (!$done) {
-- 
2.1.4