From 09a05933f1557819e83846e71a92c20222f6cabc Mon Sep 17 00:00:00 2001
From: Philip Kaludercic <philipk@posteo.net>
Date: Thu, 1 May 2025 14:50:35 +0200
Subject: Add key to run 'rgrep' in the current directory

---
 do-at-point.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/do-at-point.el b/do-at-point.el
index 63e4b9b..e6663e8 100644
--- a/do-at-point.el
+++ b/do-at-point.el
@@ -112,6 +112,8 @@ of this variable.")
               (write-region beg end file))))
      (?k "Kill" ,#'kill-region)
      (?n "Narrow" ,#'narrow-to-region)
+     (?g "Grep" ,(lambda (str)
+                   (rgrep (regexp-quote str) "*" ".")))
      (?$ "Spell check" ,#'ispell-region)
      (?| "Pipe command"
          ,(lambda (beg end)
-- 
cgit v1.0