[svn r8001] fix fucking qm script

This commit is contained in:
expo 2008-08-06 12:36:13 +02:00
parent fa42702719
commit 80425f3e04

View File

@ -90,6 +90,8 @@ while (<CSV>) {
$completion =~ s/\r//;
if (!$station) { $station = ""; }
if (!$ref) { $ref = ""; }
if (!$grade) { $grade = ""; }
if (!$desc) { $desc = ""; }
# hacked in by DL, as was acting weirdly due to uninitialized variables
if (($completion ne "") and ($ref ne ""))