From 9bfb0caf1b4bafdac8eb964f38f7820740056fff Mon Sep 17 00:00:00 2001
From: Daniel S Poulin
Date: Sun, 6 Mar 2022 00:24:24 -0500
Subject: Add comment textobject for surround selection and navigation (#1605)

---
 runtime/queries/perl/textobjects.scm | 9 +++++++++
 1 file changed, 9 insertions(+)

(limited to 'runtime/queries/perl/textobjects.scm')

diff --git a/runtime/queries/perl/textobjects.scm b/runtime/queries/perl/textobjects.scm
index 988e22b4..972b8774 100644
--- a/runtime/queries/perl/textobjects.scm
+++ b/runtime/queries/perl/textobjects.scm
@@ -6,3 +6,12 @@
 
 (argument 
   (_) @parameter.inside)
+
+[
+  (comments)
+  (pod_statement)
+] @comment.inside
+
+(comments)+ @comment.around
+
+(pod_statement) @comment.around
-- 
cgit v1.2.3-70-g09d2