changeset 146:1a5994671dcf

Oops. Fix a silly 10L.
author Matti Hamalainen <ccr@tnsp.org>
date Wed, 10 Sep 2014 12:53:30 +0300
parents c028506aa9cc
children f559f0161fd5
files parsedata.pl
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/parsedata.pl	Wed Sep 10 12:44:10 2014 +0300
+++ b/parsedata.pl	Wed Sep 10 12:53:30 2014 +0300
@@ -298,7 +298,7 @@
           my $text = $$b{"nodes"}[0]{"text"};
           $text =~ s/\.$//;
 
-          if ($text =~ /vuorov/i)
+          if ($text =~ /^vuorov/i)
           {
             $cturns = 1;
           }
@@ -347,11 +347,11 @@
         push(@$cdata1, $$cdata[$i]) if defined($$cdata[$i]);
         push(@$cdata2, $$cdata[$i+1]) if defined($$cdata[$i+1]);
       }
-      $$hourDefs{$cid} = { "turns" => $cturns, "split" => $cgrouped, "start" => $lastHour, "hours" => $chours, "data" => [ $cdata1, $cdata2 ] };
+      $$hourDefs{$cid} = { "turns" => $cturns, "grouped" => $cgrouped, "start" => $lastHour, "hours" => $chours, "data" => [ $cdata1, $cdata2 ] };
     }
     else
     {
-      $$hourDefs{$cid} = { "turns" => $cturns, "split" => $cgrouped, "start" => $lastHour, "hours" => $chours, "data" => [ $cdata ] };
+      $$hourDefs{$cid} = { "turns" => $cturns, "grouped" => $cgrouped, "start" => $lastHour, "hours" => $chours, "data" => [ $cdata ] };
     }
 
     push(@{$$hourTable{$cday}}, $tid);