diff options
-rw-r--r-- | package.json | 4 | ||||
-rw-r--r-- | server/perl.tmLanguage.json | 9 |
2 files changed, 6 insertions, 7 deletions
diff --git a/package.json b/package.json index 18fa79b..8367b8a 100644 --- a/package.json +++ b/package.json @@ -216,9 +216,7 @@ "scopeName": "source.perl", "path": "./server/perl.tmLanguage.json", "unbalancedBracketScopes": [ - "variable.other.predefined.perl", - "constant.character.escape.regex.perl", - "punctuation.definition.variable.perl" + "variable.other.predefined.perl" ] }, { diff --git a/server/perl.tmLanguage.json b/server/perl.tmLanguage.json index 9230a11..f831f35 100644 --- a/server/perl.tmLanguage.json +++ b/server/perl.tmLanguage.json @@ -814,6 +814,7 @@ ] }, { + "comment": "Finds bare // regex while avoiding //= operator. Following a newline, an empty // is assumed to be the defined-or operator.", "begin": "(?<=\\(|=|!|\\{|~|&|\\||\\bif|\\bunless|\\band|\\bor|\\bsplit|\\bgrep)\\s*((\\/))(?!\\/=)|(?<=^)\\s*((\\/))(?!\\/)", "beginCaptures": { "1": { @@ -3295,10 +3296,10 @@ { "captures": { "1": { - "name": "punctuation.definition.variable.perl" + "name": "variable.other.predefined.perl" }, "2": { - "name": "punctuation.definition.variable.perl" + "name": "variable.other.predefined.perl" } }, "match": "(\\$\\{)(?:\\^?[\\p{L}\\p{M}_\\$]|::)(?:[\\p{L}\\p{M}0-9_\\$]|::)*(\\})", @@ -3317,14 +3318,14 @@ "begin": "[\\$\\@\\%\\&]\\{(?=[^{]*})", "beginCaptures": { "0": { - "name": "punctuation.definition.variable.perl" + "name": "variable.other.predefined.perl" } }, "contentName": "meta.embedded.block.perl", "end": "\\}", "endCaptures": { "0": { - "name": "punctuation.definition.variable.perl" + "name": "variable.other.predefined.perl" } }, "name": "variable.other.readwrite.global.perl", |