more note writing enhancements

3 files changed, 24 insertions, 9 deletions

diff --git a/bard-emacs-modules/bard-emacs-calendar.el b/bard-emacs-modules/bard-emacs-calendar.el
index cd5a545..3dfba0d 100644
--- a/bard-emacs-modules/bard-emacs-calendar.el
+++ b/bard-emacs-modules/bard-emacs-calendar.el
@@ -16,10 +16,11 @@
 ;; Org todo keywords - changed to using hl-todo faces fixed by modus/ef themes
 (setq org-todo-keywords
       '((sequence "TODO(t)" "EXTRA(e)" "INPROG(i)" "|" "DONE(d)" "KILLED(k)")
-        (sequence "MEET(m)" "|" "MET(M)")))
+        (sequence "MEET(m)" "TENT(t)" "|" "MET(M)" "DITCH(d)")))
 
 (setq org-todo-keyword-faces
       '(("EXTRA" . (:inherit warning))
+        ("TENT" . (:inherit warning))
         ("INPROG" . (:inherit hi-yellow :weight bold))))
 
 (setq org-enforce-todo-dependencies t)
diff --git a/bard-emacs-modules/bard-emacs-completion.el b/bard-emacs-modules/bard-emacs-completion.el
index 7c90cc4..bb40333 100644
--- a/bard-emacs-modules/bard-emacs-completion.el
+++ b/bard-emacs-modules/bard-emacs-completion.el
@@ -231,6 +231,11 @@
     "asf"            "and so on and so forth"
     "paragraph"      "¶"
     "em"             "—"
+    "ra"             "→"
+    "la"             "←"
+    "iff"            "⇔"
+    "imp"            "⇒"
+    "tf"             "∴"
     "xmonad"         "XMonad"
     "xmobar"         "XMobar")
 
diff --git a/bard-emacs-modules/bard-emacs-writing.el b/bard-emacs-modules/bard-emacs-writing.el
index be215f2..3d9d40c 100644
--- a/bard-emacs-modules/bard-emacs-writing.el
+++ b/bard-emacs-modules/bard-emacs-writing.el
@@ -108,13 +108,8 @@
           (dedicated . t)))
 
   (denote-rename-buffer-mode 1)
-  (defun bard/find-notes-file ()
-    (interactive)
-    (let ((consult-find-args "find . -name \"*.org\"-not ( -path */.git* -prune -or -path */.cache* -prune )"))
-      (consult-find "~/Notes/denote")))
-  (defun bard/search-notes-directory ()
-    (interactive)
-    (consult-grep "~/Notes/denote"))
+
+  (require 'bard-writing)
 
   (add-hook 'denote-after-new-note-hook #'bard/denote-insert-id-at-top)
 
@@ -129,7 +124,8 @@
    ("C-c n k" . denote-rename-file-keywords)
    ("C-c n i" . denote-link)
    ("C-c n I" . denote-add-links)
-   ("C-c n b" . denote-backlinks)
+   ("C-c n b" . bard/consult-buffer-notes)   ; notes buffer
+   ("C-c n B" . bard/ibuffer-notes)          ; notes buffer but more
    ("C-c n f" . bard/find-notes-file)        ; notes-find
    ("C-c n g" . bard/search-notes-directory) ; notes-grep
    ("C-c n l" . denote-find-link)
@@ -155,6 +151,19 @@
   ("C-c n O" . denote-sequence-dired)
   ("C-c n <SPC>" . denote-sequence-region))
 
+(use-package org-roam
+  :ensure t
+  :custom
+  (org-roam-directory (file-truename "~/Notes/denote"))
+  :bind (("C-c n l" . org-roam-buffer-toggle)
+	     ("C-c n i" . org-roam-node-insert))
+  :config
+  (org-roam-db-autosync-mode 1))
+
+(use-package org-roam-ui
+  :ensure t)
+
+
 ;;; Focus mode for writing
 
 ;; Center line scrolling for focused writing