From 6465f82b90affc975b959541f23520a25e5ca5f1 Mon Sep 17 00:00:00 2001
From: Vedang Manerikar <ved.manerikar@gmail.com>
Date: Fri, 3 Jan 2025 21:46:43 +0530
Subject: [PATCH] Ask consult-imenu to start from the thing-at-point symbol
---
unravel-emacs.org | 2 ++
unravel-modules/unravel-completion.el | 1 +
2 files changed, 3 insertions(+)
diff --git a/unravel-emacs.org b/unravel-emacs.org
index 3435378..6a0a8b2 100644
--- a/unravel-emacs.org
+++ b/unravel-emacs.org
@@ -177,6 +177,7 @@
- [[#the-unravel-studyel-section-for-flashcards-org-fc][The =unravel-study.el= section for flashcards (~org-fc~)]]
- [[#the-unravel-studyel-section-for-table-of-contents-toc-org][The =unravel-study.el= section for table of contents (~toc-org~)]]
- [[#the-unravel-studyel-section-for-archiving-web-content-org-board][The =unravel-study.el= section for archiving web content (~org-board~)]]
+ - [[#the-unravel-studeel-section-for-publishing-org-mode-content-ox-gfm][The =unravel-stude.el= section for publishing org-mode content (~ox-gfm~)]]
- [[#finally-we-provide-the-unravel-studyel-module][Finally, we provide the =unravel-study.el= module]]
- [[#custom-libraries][Custom libraries]]
- [[#the-prot-commonel-library][The =prot-common.el= library]]
@@ -2307,6 +2308,7 @@ Also check: [[#h:e0f9c30e-3a98-4479-b709-7008277749e4][The =unravel-search.el= m
(setq consult-preview-key 'any)
;; the `imenu' extension is in its own file
(require 'consult-imenu)
+ (consult-customize consult-imenu :initial (thing-at-point 'symbol))
(dolist (clj '(clojure-mode clojure-ts-mode))
(add-to-list 'consult-imenu-config
`(,clj :toplevel "Functions"
diff --git a/unravel-modules/unravel-completion.el b/unravel-modules/unravel-completion.el
index a08771a..4e2db3e 100644
--- a/unravel-modules/unravel-completion.el
+++ b/unravel-modules/unravel-completion.el
@@ -276,6 +276,7 @@
(setq consult-preview-key 'any)
;; the `imenu' extension is in its own file
(require 'consult-imenu)
+ (consult-customize consult-imenu :initial (thing-at-point 'symbol))
(dolist (clj '(clojure-mode clojure-ts-mode))
(add-to-list 'consult-imenu-config
`(,clj :toplevel "Functions"