[Bps-public-commit] cpan2rt branch, alternate-bugtracker-sync, updated. deployed-6-g4925fd3

[Thomas Sibley]

The branch, alternate-bugtracker-sync has been updated
       via  4925fd39fe5f3a6500e5821cbe53aae56cf5feb3 (commit)
      from  f8eb29b5847b049f3e9d7a35caaf33a7cf4b8bdf (commit)

Summary of changes:
 lib/CPAN2RT.pm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

- Log -----------------------------------------------------------------
commit 4925fd39fe5f3a6500e5821cbe53aae56cf5feb3
Author: Thomas Sibley <trs at bestpractical.com>
Date:   Wed Mar 13 16:36:17 2013 -0700

    Send a User-Agent with MetaCPAN requests
    
    Forces transport to "http" even though it's the default so we guarantee
    the ->agent method will work on the transport client if the default
    changes in the future.

diff --git a/lib/CPAN2RT.pm b/lib/CPAN2RT.pm
index 2936d41..87bbe10 100644
--- a/lib/CPAN2RT.pm
+++ b/lib/CPAN2RT.pm
@@ -155,9 +155,11 @@ sub fetch_bugtracker {
 
     require ElasticSearch;
     my $es = ElasticSearch->new(
-        servers => 'api.metacpan.org',
-        no_refresh => 1,
+        servers     => 'api.metacpan.org',
+        no_refresh  => 1,
+        transport   => 'http',
     );
+    $es->transport->client->agent(join "/", __PACKAGE__, $VERSION);
 
     # Ian Norton wrote:
     # > Thomas Sibley wrote:

-----------------------------------------------------------------------