Update Perl stringBody

Backslash escapes are valid escapes in a single quote string body in Perl.
This commit is contained in:
Jin Cao 2024-05-29 22:23:52 -04:00 committed by Jin Cao
parent a5e379c985
commit d18f6db7ba

View file

@ -534,7 +534,7 @@ export const language = <languages.IMonarchLanguage>{
stringBody: [ stringBody: [
[/'/, 'string', '@popall'], [/'/, 'string', '@popall'],
[/\\'/, 'string.escape'], [/\\'|\\\\/, 'string.escape'],
[/./, 'string'] [/./, 'string']
], ],