dotfiles/emacs-lisp/el_secretario.org
2023-09-16 19:54:12 +02:00

921 B

El Secretario

  (use-package el-secretario
    :straight (el-secretario :type git :host nil :repo "https://git.sr.ht/~magic_rb/el-secretario")
    :defer t
    :config
    (setq el-secretario-session-end-hook nil)
    (setq el-secretario-session-start-hook nil))
  (defun el-secretario-emacs-lisp-review ()
    "Review all Org-Roam nodes tagged as 'emacs-lisp'."
    (interactive)
    (el-secretario-start-session
     (el-secretario-files-make-source
      (seq-map #'car
        (org-roam-db-query
         [:select [nodes:file]
          :from tags
          :left-join nodes
          :on (= tags:node-id nodes:id)
          :where (like tag (quote "%\"emacs-load\""))]))
      )))