Re: Functions which are mode dependent

[Heime <heimeborgia@protonmail.com>]

Is this be the correct way for a minor mode to use the variable
tema-expr-elisp for imenu-generic-expression that will be applied
when enabling tema-minor-mode on a buffer in emacs-lisp-mode ?

(defvar tema-expr-elisp
  '(("Functions" "^\\s-(defun\\s-+\\(\\_<.?\\_>\\)" 1)))
 
(defun tema-imenu-expr-elisp ()
  "Set up a custom imenu expression for the current buffer."
  (setq-local imenu-generic-expression tema-expr-elisp))
 
;;;###autoload
(define-minor-mode tema-minor-mode
  "DESC."
  :init-value nil
  :lighter " Tema"
 
  (if tema-minor-mode
      (progn
        (add-hook 'sh-mode-hook #'tema-imenu-expr-sh)
        (add-hook 'emacs-lisp-mode-hook #'tema-imenu-expr-elisp))
    (remove-hook 'sh-mode-hook #'tema-imenu-expr-sh)
    (remove-hook 'emacs-lisp-mode-hook #'tema-imenu-expr-elisp)))