From 0d1820c53882f482555ef56e11cf1692187d465a Mon Sep 17 00:00:00 2001 From: BirDt_ Date: Sun, 31 May 2026 17:47:13 +0800 Subject: [PATCH] Combobulate and narrowing --- shared-packages.el | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) diff --git a/shared-packages.el b/shared-packages.el index e8d6dac..00ff031 100644 --- a/shared-packages.el +++ b/shared-packages.el @@ -47,6 +47,22 @@ ;; For per-workflow utilities (use-package narrow-indirect) +;; Better navigation with treesitter +(use-package combobulate + :config + (defun narrow-to-defun-indirect () + "Narrow to the current defun in an indirect buffer." + (interactive) + (combobulate-navigate-end-of-defun) + (end-of-line) + (set-mark-command nil) + (combobulate-navigate-beginning-of-defun) + (beginning-of-line) + (ni-narrow-to-region-indirect-other-window + (region-beginning) + (region-end) + (point)))) + (provide 'shared-packages) ;;; shared-packages.el ends here