summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--package.json4
-rw-r--r--server/perl.tmLanguage.json9
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",