# HG changeset patch
# User Matti Hamalainen <ccr@tnsp.org>
# Date 1410342810 -10800
# Node ID 1a5994671dcf748da1764bddd1cab87eb78230ef
# Parent  c028506aa9cc22b704cebb47ae115b17ccaf2614
Oops. Fix a silly 10L.

diff -r c028506aa9cc -r 1a5994671dcf parsedata.pl
--- 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);