aboutsummaryrefslogtreecommitdiff
path: root/+org.el
diff options
context:
space:
mode:
Diffstat (limited to '+org.el')
-rw-r--r--+org.el104
1 files changed, 0 insertions, 104 deletions
diff --git a/+org.el b/+org.el
deleted file mode 100644
index fbd57db..0000000
--- a/+org.el
+++ /dev/null
@@ -1,104 +0,0 @@
-;;; $DOOMDIR/+org.el -*- lexical-binding: t; -*-
-(setq org-directory "~/org/")
-(after! org
- (setq
- org-startup-indented t
- org-pretty-entities t
- org-hide-emphasis-markers t
- org-capture-templates-contexts nil
- org-confirm-babel-evaluate nil)
- (org-babel-do-load-languages
- 'org-babel-load-languages
- '((emacs-lisp . t)
- (python . t)
- (C . t)
- (lisp . t))))
-
-(add-hook 'org-capture-mode-hook #'delete-other-windows)
-(add-hook 'org-capture-mode-hook
- (lambda () (set-window-dedicated-p (selected-window) nil)))
-
-(after! org-roam
- (setq org-roam-directory (file-truename "~/org/"))
- (org-roam-db-autosync-mode)
-
- (defun my/org-roam-short-id ()
- (let ((chars "abcdefghijklmnopqrstuvwxyz0123456789"))
- (apply #'string
- (cl-loop repeat 4
- collect (aref chars (random (length chars)))))))
-
- (setq org-roam-capture-templates
- '(("d" "default" plain
- "* %?"
- :if-new
- (file+head
- (lambda () (concat (my/org-roam-short-id) ".org"))
- "#+TITLE: %^{title|Untitled}\n#+FILETAGS: :%^{tags}:\n\n")
- :unnarrowed t)))
-
- (cl-defmethod org-roam-node-file-stem ((node org-roam-node))
- (file-name-base (org-roam-node-file node)))
-
- (setq org-roam-node-display-template
- (concat "${title:*} " (propertize "${file-stem}" 'face 'org-tag)))
-
- (setq org-roam-mode-sections
- '(org-roam-backlinks-section
- org-roam-reflinks-section
- org-roam-unlinked-references-section))
-
- (defun my/org-roam-check-self-link ()
- (when-let* ((node (org-roam-node-at-point))
- (id (org-roam-node-id node)))
- (save-excursion
- (goto-char (point-min))
- (while (re-search-forward org-link-any-re nil t)
- (when (string-match-p (regexp-quote id) (match-string 0))
- (message "Warning: self-link detected"))))))
-
- (defun my/org-roam-check-dead-links ()
- (dolist (link (org-roam-db-query
- [:select [dest] :from links
- :where (= source $s1)] (org-roam-id-at-point)))
- (unless (org-roam-db-query [:select id :from nodes :where (= id $s1)] (car link))
- (message "Error: dead link to %s" (car link)))))
-
- (add-hook 'before-save-hook
- (lambda ()
- (when (org-roam-file-p)
- (my/org-roam-check-self-link)
- (my/org-roam-check-dead-links)))
- nil t)
- (map!
- :leader
- :prefix ("n r" . "roam")
- :desc "Find node" "f" #'org-roam-node-find
- :desc "Insert node" "i" #'org-roam-node-insert
- :desc "Backlinks" "b" #'org-roam-buffer-toggle
- :desc "Capture" "c" #'org-roam-capture
- :desc "Graph" "g" #'org-roam-graph
- :desc "Random node" "r" #'org-roam-node-random
- :desc "Toggle buffer" "t" #'org-roam-buffer-toggle
- :desc "Open link" "o" #'org-open-at-point
- :desc "Jump back" "O" #'org-mark-ring-goto))
-(with-eval-after-load 'ox-html
- (setq org-html-xml-declaration nil
- org-html-doctype "html5"
- org-html-html5-fancy t
- org-html-head-include-default-style nil
- org-html-postamble nil))
-(use-package! websocket :after org-roam)
-(use-package! org-roam-ui
- :after org-roam
- :config
- (setq org-roam-ui-sync-theme t
- org-roam-ui-follow t
- org-roam-ui-update-on-save t))
-(use-package! org-appear
- :hook (org-mode . org-appear-mode)
- :config
- (setq org-appear-autoemphasis t
- org-appear-autolinks t
- org-appear-autosubmarkers t
- org-appear-autoentities t))