config/doom: generate org-roam templates

This commit is contained in:
xeruf 2021-11-18 11:14:28 +01:00
parent 3e5e2ecd85
commit 92bdc5fea2
6 changed files with 12 additions and 31 deletions

View File

@ -177,7 +177,7 @@ Version 2019-11-04 2021-02-16"
:config :config
(add-to-list 'recentf-exclude "writing\\/tug") (add-to-list 'recentf-exclude "writing\\/tug")
(add-to-list 'recentf-exclude "\\.\\(sync\\|stversions\\|stfolder\\)") (add-to-list 'recentf-exclude "\\.\\(sync\\|stversions\\|stfolder\\)")
(setq recentf-list (append '("/home/janek/data/4-incubator/downloads/") recentf-list)) (add-to-list 'recentf-list "/home/janek/data/4-incubator/downloads/")
;(setq recentf-keep '(recentf-keep-default-predicate file-remote-p)) ;(setq recentf-keep '(recentf-keep-default-predicate file-remote-p))
) )
@ -361,17 +361,18 @@ Version 2019-11-04 2021-02-16"
`(("d" "default" plain "%?" :target `(("d" "default" plain "%?" :target
(file+head "%<%Y%m%d>-${slug}.org" ,(concat my/org-roam-capture-props "#+filetags: :" my/org-roam-capture-title)) (file+head "%<%Y%m%d>-${slug}.org" ,(concat my/org-roam-capture-props "#+filetags: :" my/org-roam-capture-title))
:unnarrowed t) :unnarrowed t)
("p" "person" plain "%?" :target )
(file+head "person/%<%Y%m%d>-${slug}.org" ,(concat my/org-roam-capture-props "#+filetags: :person:" my/org-roam-capture-title)) )
:unnarrowed t) (cl-loop for item in '("health" "own" "list" "notes" "project" "person" "tech:software:list" "faith" "inspiration")
("t" "tech" plain "%?" :target do (add-to-list 'org-roam-capture-templates
(file+head "tech/%<%Y%m%d>-${slug}.org" ,(concat my/org-roam-capture-props "#+filetags: tech:software:list:" my/org-roam-capture-title)) `(,(substring item 0 1) ,(car (split-string item ":")) plain "%?" :target
(file+head ,(concat (car (split-string item ":")) "/%<%Y%m%d>-${slug}.org") ,(concat my/org-roam-capture-props "#+filetags: :" item ":" my/org-roam-capture-title))
:unnarrowed t) :unnarrowed t)
) )
) )
(defvar my/auto-org-roam-db-sync--timer nil) (defvar my/auto-org-roam-db-sync--timer nil)
(defvar my/auto-org-roam-db-sync--timer-interval 3) (defvar my/auto-org-roam-db-sync--timer-interval 30)
(define-minor-mode my/auto-org-roam-db-sync-mode (define-minor-mode my/auto-org-roam-db-sync-mode
"Toggle automatic `org-roam-db-sync' when Emacs is idle. "Toggle automatic `org-roam-db-sync' when Emacs is idle.
Referece: `auto-save-visited-mode'" Referece: `auto-save-visited-mode'"
@ -382,8 +383,8 @@ Version 2019-11-04 2021-02-16"
(when my/auto-org-roam-db-sync-mode (when my/auto-org-roam-db-sync-mode
(run-with-idle-timer (run-with-idle-timer
my/auto-org-roam-db-sync--timer-interval :repeat my/auto-org-roam-db-sync--timer-interval :repeat
(and 'org-roam-db-sync 'org-roam-update-org-id-locations))))) (and 'org-roam-db-sync 'org-roam-update-org-id-locations 'org-mode-restart)))))
;(my/auto-org-roam-db-sync-mode) (my/auto-org-roam-db-sync-mode)
) )

View File

@ -1,5 +0,0 @@
# -*- mode: snippet -*-
# name: Tag roam file as inspiration
# key: +i
# --
#+filetags: :inspiration:

View File

@ -1,5 +0,0 @@
# -*- mode: snippet -*-
# name: Tag roam file as person
# key: +person
# --
#+filetags: :person:

View File

@ -1,5 +0,0 @@
# -*- mode: snippet -*-
# name: Tag roam file as project
# key: +pr
# --
#+filetags: :project:

View File

@ -1,5 +0,0 @@
# -*- mode: snippet -*-
# name: Tag roam file as tech
# key: +tech
# --
#+filetags: :tech:software:list:

View File

@ -2,4 +2,4 @@
# name: Add Org Roam tags # name: Add Org Roam tags
# key: +t # key: +t
# -- # --
#+filetags: #+filetags: :