From: Jan Willamowius <jan@willamowius.de>
Date: Wed, 21 Sep 2005 22:50:34 +0000 (+0000)
Subject: set UserAgent to 'Spong'
X-Git-Tag: spong-2_8_0-beta1~6
X-Git-Url: http://git.etc.gen.nz/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=f658781a5009fad684e780e36867e9d8c6baee1a;p=spong.git

set UserAgent to 'Spong'
---

diff --git a/src/lib/Spong/Network/plugins/check_https b/src/lib/Spong/Network/plugins/check_https
index 39d6b84..413bbf3 100755
--- a/src/lib/Spong/Network/plugins/check_https
+++ b/src/lib/Spong/Network/plugins/check_https
@@ -32,6 +32,7 @@ sub check_https {
 
    foreach $file ( @https_files ) {
      my $useragent = LWP::UserAgent->new;
+     $useragent->agent('Spong');
      my $request =
        HTTP::Request->new(HEAD => "https://$host:$https_port$file");
      my $result = $useragent->request($request);