summaryrefslogtreecommitdiff
path: root/runtime/queries/perl/fold.scm
diff options
context:
space:
mode:
Diffstat (limited to 'runtime/queries/perl/fold.scm')
-rw-r--r--runtime/queries/perl/fold.scm19
1 files changed, 19 insertions, 0 deletions
diff --git a/runtime/queries/perl/fold.scm b/runtime/queries/perl/fold.scm
new file mode 100644
index 00000000..17fd114b
--- /dev/null
+++ b/runtime/queries/perl/fold.scm
@@ -0,0 +1,19 @@
+(comment) @fold
+(pod) @fold
+
+; fold the block-typed package statements only
+(package_statement (block)) @fold
+
+[(subroutine_declaration_statement)
+ (conditional_statement)
+ (loop_statement)
+ (for_statement)
+ (cstyle_for_statement)
+ (block_statement)
+ (phaser_statement)] @fold
+
+(anonymous_subroutine_expression) @fold
+
+; perhaps folks want to fold these too?
+[(anonymous_array_expression)
+ (anonymous_hash_expression)] @fold