|
@@ -2361,6 +2361,12 @@ sub process {
|
|
|
"quoted string split across lines\n" . $hereprev);
|
|
|
}
|
|
|
|
|
|
+# check for missing a space in a string concatination
|
|
|
+ if ($prevrawline =~ /[^\\]\w"$/ && $rawline =~ /^\+[\t ]+"\w/) {
|
|
|
+ WARN('MISSING_SPACE',
|
|
|
+ "break quoted strings at a space character\n" . $hereprev);
|
|
|
+ }
|
|
|
+
|
|
|
# check for spaces before a quoted newline
|
|
|
if ($rawline =~ /^.*\".*\s\\n/) {
|
|
|
if (WARN("QUOTED_WHITESPACE_BEFORE_NEWLINE",
|