Fix the index menu (imenu) and quite being clever

This commit is contained in:
Howard Abrams 2024-07-15 21:15:31 -07:00
parent 18980ec2f2
commit 3aaf79eb24

View file

@ -121,11 +121,10 @@ Ive often called =imenu= to easily jump to a function definition in a file (o
(when (derived-mode-p 'prog-mode) (when (derived-mode-p 'prog-mode)
(setq-local imenu-sort-function #'imenu--sort-by-name))) (setq-local imenu-sort-function #'imenu--sort-by-name)))
;; Add the imenu-setup to _some_ mode's hooks: (add-hook 'org-mode-hook 'ha-imenu-setup)
(dolist (mode '(prog makefile org markdown)) (add-hook 'markdown-mode-hook 'ha-imenu-setup)
(let ((hook (make-symbol (format "%s-mode-hook" mode)))) (add-hook 'prog-mode-hook 'ha-imenu-setup)
(message "Add 'ha-imenu-setup to %s" hook) (add-hook 'makefile-mode-hook 'ha-imenu-setup)
(add-hook hook 'ha-imenu-setup)))
#+end_src #+end_src
** File Access ** File Access