regression: Fix a bug in the script.
This commit is contained in:
parent
1854a2eb3c
commit
e8d4b2be99
|
@ -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";
|
||||
|
|
Loading…
Reference in a new issue