# HG changeset patch
# User Matti Hamalainen <ccr@tnsp.org>
# Date 1506601000 -10800
# Node ID dbe9e233f56498e443c869e09822dd5ec4237b4d
# Parent  fe671cd76ecc7c9ab3f40fbfc8ff8f5b1b90d530
Cosmetics.

diff -r fe671cd76ecc -r dbe9e233f564 fetch_weather.pl
--- a/fetch_weather.pl	Thu Sep 28 15:15:23 2017 +0300
+++ b/fetch_weather.pl	Thu Sep 28 15:16:40 2017 +0300
@@ -388,7 +388,7 @@
       if ($fetch_meta || opt_chk_bool("force_update"))
       {
         my $uri = opt_get("tiehallinto_meta_url");
-        print STDERR "Fetching Tiehallinto static meta data from $uri\n" if (opt_get_int("debug") > 1);
+        print STDERR "Fetching Tiehallinto static meta data from ".$uri."\n" if (opt_get_int("debug") > 1);
         my $res = fetch_http($uri);
         die("Failed to fetch $uri data.\n") unless ($res->code <= 200 && $res->code <= 201);
 
@@ -405,7 +405,7 @@
       }
       else
       {
-        print STDERR "Using CACHED Tiehallinto static meta data from '$meta_file'.\n" if (opt_get_int("debug") > 0);
+        print STDERR "Using CACHED Tiehallinto static meta data from '".$meta_file."'.\n" if (opt_get_int("debug") > 0);
         $meta_str = read_text($meta_file);
       }
 
@@ -418,7 +418,7 @@
       if ($fetch_meta)
       {
         # Save new cache, in more optimal form, if needed.
-        print STDERR "Storing to cache '$meta_file'.\n" if (opt_get_int("debug") > 0);
+        print STDERR "Storing to cache '".$meta_file."'.\n" if (opt_get_int("debug") > 0);
         write_binary($meta_file, JSON->new->encode($json));
       }