X-Git-Url: http://git.ipfire.org/?a=blobdiff_plain;f=src%2Fscripts%2Fsetddns.pl;h=6c4c3697f1a119fde083d090370bb8b84996a7fa;hb=b2f8244ae28ce553f5e51a161f6c13a1188f8a4e;hp=8794ca62eb89a7bc13cde709ac1f9abac96f48bf;hpb=5a2935b1b335077e7df76ae3dbd75331056bd198;p=people%2Fteissler%2Fipfire-2.x.git

diff --git a/src/scripts/setddns.pl b/src/scripts/setddns.pl
index 8794ca62e..6c4c3697f 100644
--- a/src/scripts/setddns.pl
+++ b/src/scripts/setddns.pl
@@ -260,9 +260,10 @@ if ($ip ne $ipcache) {
 			        $authstring = "username=$settings{'LOGIN'}&password=$settings{'PASSWORD'}";
 			    }
 
+			    my $user_agent = &General::MakeUserAgent();
 			    my ($out, $response) = Net::SSLeay::get_https("dns.lightningwirelabs.com", 443,
 				"/update?hostname=$settings{'HOSTDOMAIN'}&address4=$ip&$authstring",
-				Net::SSLeay::make_headers('User-Agent' => 'IPFire')
+				Net::SSLeay::make_headers('User-Agent' => $user_agent)
 			    );
 
 			    # Valid response are 'ok'   'nochange'