regression: Fix a bug in the script.

This commit is contained in:
Solomon Peachy 2018-09-22 08:19:56 -04:00
parent 1854a2eb3c
commit e8d4b2be99

View file

@ -18,7 +18,7 @@ while (<STDIN>) {
if (length($row[4])) {
$ENV{"MEDIA_CODE"} = $row[4];
} else {
unset($ENV{"MEDIA_CODE"});
undef($ENV{"MEDIA_CODE"});
}
print "***** $row[0] $row[1] $row[2] $row[3] $row[4]\n";