Merge pull request microsoft#85642 from kthy/perl5-region-folding

aeschli · web-flow · commit 6c74e9757f97 · 2019-12-12T00:28:23.000-08:00
feat: region folding for perl5
diff --git a/extensions/perl/perl.language-configuration.json b/extensions/perl/perl.language-configuration.json
@@ -25,8 +25,8 @@
 	],
 	"folding": {
 		"markers": {
-			"start": "^=pod\\s*$",
-			"end": "^=cut\\s*$"
+			"start": "^(?:(?:=pod\\s*$)|(?:\\s*#region\\b))",
+			"end": "^(?:(?:=cut\\s*$)|(?:\\s*#endregion\\b))"
 		}
 	}
 }
