;; -*- lexical-binding: t; -*-


(defun org-roam-node-insert-immediate (arg &rest args)
  "Insert a new org mode link, but do not open the
file."
  (interactive "P")
  (let ((args (cons arg args))
        (org-roam-capture-templates (list (append (car org-roam-capture-templates)
                                                  '(:immediate-finish t)))))
    (apply #'org-roam-node-insert args)))

(use-package org-roam
  :after org
  :bind (("C-c n l" . 'org-roam-buffer-toggle)
         ("C-c n f" . 'org-roam-node-find)
         ("C-c n i" . 'org-roam-node-insert)
         ("C-c n g" . 'org-roam-graph)
         ("C-c n I" . 'org-roam-node-insert-immediate)
         ("C-c n j" . 'org-roam-dailies-capture-today)
         :map org-mode-map
         ("C-M-i" . 'completion-at-point))
  :config
  (org-roam-db-autosync-mode)
  :custom
  (org-roam-directory (expand-file-name "~/Personal/roam/"))
  (org-roam-dailies-directory "logs/")
  (org-roam-complete-everywhere t)
  (org-roam-capture-templates '(("e" "extend" plain
                                 "#+AUTHOR: bdunahu\n#+DESCRIPTION: %^{Description}\n#+STARTUP: show3levels\n" :target
                                 (file+head "%<%Y%m%d%H%M%S>-${slug}.org" "#+TITLE: ${title}")
                                 :unnarrowed t)
                                ("d" "default" plain "%?" :target
                                 (file+head "%<%Y%m%d%H%M%S>-${slug}.org" "#+title: ${title}")
                                 :unnarrowed t))))


(provide 'bd--roam)