Revert "Allow groups to descend past neighboring headings. Not ideal."

This reverts commit 89035a1c92e28ca984746eebc80adaced7dcbf53.

diff --git a/bin/sync.pl b/bin/sync.pl
index c2f4d749a1e8a2eefdad943b9fe95488b32e9997..0c0db344e9abf66f2caf39d07131d4d2c14b3c38 100644 (file)
--- a/bin/sync.pl
+++ b/bin/sync.pl
@@ -261,6 +261,10 @@ sub get_group_assignments {
                        ++$col;
                        my $contents = $val->{'userEnteredValue'}{'stringValue'};
                        next if !defined($contents);
+                       if ($contents =~ /Gruppe /) {
+                               @curr_groups = ();
+                               last;
+                       }
                        next if (ignore_cell($contents));
                        if ($contents =~ /^(G\d\.\d)/ || $contents =~ /^(Nye løpere.*|New runner.*)/) {
                                $curr_groups[$col] = $1;
@@ -309,6 +313,10 @@ sub find_spare_cell {
                                }
                                next;
                        }
+                       if ($contents =~ /Gruppe /) {
+                               @curr_groups = ();
+                               last;
+                       }
                        next if (ignore_cell($contents));
                        if ($contents =~ /^(G\d\.\d)/ || $contents =~ /^(Nye løpere.*|New runner.*)/) {
                                $curr_groups[$colno] = $1;