qgm2cpp.pl fix

jef-n · jef-n · commit 14fbb942c77e · 2016-10-18T12:07:28.000+02:00
diff --git a/scripts/qgm2cpp.pl b/scripts/qgm2cpp.pl
@@ -44,7 +44,7 @@ sub parse {
 						if $label =~ /^\s+/ || $label =~ /\s+$/ || $label !~ /^[A-Z0-9(]/;	
 					$label =~ s/^\s+//;
 					$label =~ s/\s+$//;
-					$label =~ ucfirst $label;
+					$label = ucfirst $label;
 					$labels{$label} = 1;
 				} else {
 					parse($a->{$b});
