And now properly fix that syntax error

diff --git a/scripts/controllib.pl b/scripts/controllib.pl
index 81b1650754265e63f96947d2a918c89d8837703f..7b70e75a208e3273907baaf2cd89b926652be1bd 100755 (executable)
--- a/scripts/controllib.pl
+++ b/scripts/controllib.pl
@@ -181,7 +181,7 @@ sub parsecdata {
     $index=''; $cf=''; $paraborder=1;
     while (<CDATA>) {
         s/\s*\n$//;
-       if (m/^$/ and $paraborder) next;
+       next if (m/^$/ and $paraborder);
        $paraborder=0;
         if (m/^(\S+)\s*:\s*(.*)$/) {
             $cf=$1; $v=$2;