(Emacs/config|core)~<SPC-fp>: go to config.org -> search org heading

This commit is contained in:
2024-04-23 01:40:27 +05:30
parent 5aec6298cf
commit a35eeb19b9
2 changed files with 6 additions and 11 deletions

View File

@@ -555,11 +555,8 @@ a 'project'.
"t" #'projectile-test-project "t" #'projectile-test-project
"r" #'projectile-run-project "r" #'projectile-run-project
"q" #'projectile-replace-regexp) "q" #'projectile-replace-regexp)
(leader "p" '(projectile-command-map :which-key "Projectile")) (leader
(nmap "p" '(projectile-command-map :which-key "Projectile"))
"<f5>" #'projectile-compile-project
"<f6>" #'projectile-configure-project
"<f7>" #'projectile-test-project)
:init :init
(setq projectile-tags-command "ctags -Re -f \"%s\" %s \"%s\"" (setq projectile-tags-command "ctags -Re -f \"%s\" %s \"%s\""
projectile-enable-caching t)) projectile-enable-caching t))
@@ -1257,6 +1254,7 @@ Some bindings for org mode.
"Searches directory (of buffer) for org headings via counsel-rg" "Searches directory (of buffer) for org headings via counsel-rg"
(interactive) (interactive)
(counsel-rg "^\\* " (file-name-directory (buffer-file-name)))) (counsel-rg "^\\* " (file-name-directory (buffer-file-name))))
(defun +org/search-config-headings () (defun +org/search-config-headings ()
"Searches USER-EMACS-DIRECTORY for org headings via counsel-rg" "Searches USER-EMACS-DIRECTORY for org headings via counsel-rg"
(interactive) (interactive)
@@ -1270,8 +1268,8 @@ Some bindings for org mode.
"i" #'org-insert-last-stored-link) "i" #'org-insert-last-stored-link)
(code-leader (code-leader
"D" #'org-babel-detangle) "D" #'org-babel-detangle)
(search-leader (file-leader
"c" #'+org/search-config-headings) "p" #'+org/search-config-headings)
(search-leader (search-leader
:keymaps 'org-mode-map :keymaps 'org-mode-map
"I" #'+org/search-headings) "I" #'+org/search-headings)

View File

@@ -147,10 +147,7 @@ Some bindings that I couldn't fit elsewhere easily.
(file-leader (file-leader
"f" #'find-file "f" #'find-file
"F" #'find-file-other-frame "F" #'find-file-other-frame
"s" #'save-buffer "s" #'save-buffer)
"p" `(,(proc (interactive)
(find-file (concat user-emacs-directory "config.org")))
:which-key "Open config.org"))
(quit-leader (quit-leader
"q" #'save-buffers-kill-terminal "q" #'save-buffers-kill-terminal