detect comments with no whitespace after //

diff --git a/data/gen-common.pm b/data/gen-common.pm
index 38691fb4504b891454cfbbbd80c06a604e61aff7..60d73e818ca7d56969e106e1a7b3f4694614b1fe 100644 (file)
--- a/data/gen-common.pm
+++ b/data/gen-common.pm
@@ -22,7 +22,7 @@ $prefix eq 'ctl_' and $ctl = 1;
 sub get_json() {
        local $/;
        my $json = <>;
-       $json =~ s/^\s*\/\/ .*$//mg;
+       $json =~ s/^\s*\/\/.*$//mg;
        return decode_json($json);
 }