Mercurial > hg > lukkari
changeset 169:04c4f1a95dbd
Fix parsing of some course codes.
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Mon, 24 Aug 2015 10:59:20 +0300 |
parents | 8b2107f0d50b |
children | 34ce8339b956 |
files | parsedata.pl |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/parsedata.pl Mon Aug 24 10:51:52 2015 +0300 +++ b/parsedata.pl Mon Aug 24 10:59:20 2015 +0300 @@ -254,7 +254,7 @@ $maxDays = $cday + 1 if ($cday + 1 > $maxDays); # Grouped, if there is another class ID in second slot - $cgrouped = 1 if ($$cdata[1] =~ /^[A-Z]\d{5,6}[A-Z]*$/); + $cgrouped = 1 if ($$cdata[1] =~ /^([A-Z]\d{5,6}[A-Z]*|[A-Z0-9]{6,8})$/); if ($cgrouped) { my $cdata1 = [];