Mercurial > hg > egg-tcls

changeset 386:299744a6c592

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Cosmetics.
author Matti Hamalainen <ccr@tnsp.org>
date Mon, 08 Feb 2016 13:45:28 +0200
parents 4244e30530a2
children ff3037bc6efc 61e1e2118595
files fetch_weather.pl
diffstat 1 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/fetch_weather.pl	Mon Feb 08 13:44:08 2016 +0200
+++ b/fetch_weather.pl	Mon Feb 08 13:45:28 2016 +0200
@@ -224,7 +224,8 @@
     {
       # Ignore comments and empty lines
     }
-    elsif (/^\s*\"?([a-zA-Z0-9_]+)\"?\s*=>?\s*(\d+),?\s*$/) {
+    elsif (/^\s*\"?([a-zA-Z0-9_]+)\"?\s*=>?\s*(\d+),?\s*$/)
+    {
       my $key = lc($1);
       my $value = $2;
       if (defined($settings{$key})) {
@@ -236,7 +237,8 @@
         $errors = 1;
       }
     }
-    elsif (/^\s*\"?([a-zA-Z0-9_]+)\"?\s*=>?\s*\"(.*?)\",?\s*$/) {
+    elsif (/^\s*\"?([a-zA-Z0-9_]+)\"?\s*=>?\s*\"(.*?)\",?\s*$/)
+    {
       my $key = lc($1);
       my $value = $2;
       if (defined($settings{$key}))