Mercurial > hg > egg-tcls

changeset 170:e4faa3746869

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Remove useless parameters from XMLin().
author Matti Hamalainen <ccr@tnsp.org>
date Tue, 03 Jun 2014 12:58:46 +0300
parents c12e422a543a
children 5434903331df
files fetch_weather.pl
diffstat 1 files changed, 1 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/fetch_weather.pl	Mon Jun 02 22:52:30 2014 +0300
+++ b/fetch_weather.pl	Tue Jun 03 12:58:46 2014 +0300
@@ -361,10 +361,7 @@
 
   if ($res->code >= 200 && $res->code <= 201)
   {
-    my $xml = XMLin($res->decoded_content,
-      KeyAttr => { server => 'name' },
-      ForceArray => [ 'server', 'address' ]);
-
+    my $xml = XMLin($res->decoded_content);
     my $time_base = time();
 
     foreach my $item (@{$xml->{"wfs:member"}})