diff fetch_weather.pl @ 198:60a4c69c7f25

Cosmetics.
author Matti Hamalainen <ccr@tnsp.org>
date Mon, 16 Jun 2014 03:18:38 +0300
parents 0fd2435371eb
children 95012f8f687a
line wrap: on
line diff
--- a/fetch_weather.pl	Mon Jun 16 03:11:43 2014 +0300
+++ b/fetch_weather.pl	Mon Jun 16 03:18:38 2014 +0300
@@ -46,13 +46,13 @@
 
 sub fetch_http($)
 {
-  my $tmpAgent = LWP::UserAgent->new;
-  $tmpAgent->agent($settings{"http_user_agent"});
-  $tmpAgent->timeout(10);
+  my $agent = LWP::UserAgent->new;
+  $agent->agent($settings{"http_user_agent"});
+  $agent->timeout(10);
 
-  my $tmpRequest = HTTP::Request->new(GET => $_[0]);
+  my $req = HTTP::Request->new(GET => $_[0]);
   
-  return $tmpAgent->request($tmpRequest);
+  return $agent->request($req);
 }