From 2d472f6acc3be5b3cca31f94aeeb5efdc86e51ca Mon Sep 17 00:00:00 2001
From: Michael Thomson <michael@michaelthomson.dev>
Date: Mon, 21 Apr 2025 22:12:12 -0400
Subject: [PATCH] update

---
 modules/home-manager/emacs/emacs/init.el | 37 +++++++++++++++---------
 1 file changed, 24 insertions(+), 13 deletions(-)

diff --git a/modules/home-manager/emacs/emacs/init.el b/modules/home-manager/emacs/emacs/init.el
index 0696c90..34931f6 100644
--- a/modules/home-manager/emacs/emacs/init.el
+++ b/modules/home-manager/emacs/emacs/init.el
@@ -310,24 +310,35 @@
   (org-capture-templates
    `(("i" "Inbox" entry  (file "inbox.org")
 	  ,(concat "* TODO %?\n"
-			   "/Entered on/ %U"))
+			   "Entered on %U"))
+	 ("m" "Meeting" entry  (file+headline "agenda.org" "Future")
+	  ,(concat "* %? :meeting:\n"
+			   "<%<%Y-%m-%d %a %H:00>>"))
+	 ("n" "Note" entry  (file "notes.org")
+	  ,(concat "* Note (%a)\n"
+			   "Entered on %U\n" "\n" "%?"))
 	 ("@" "Inbox [mu4e]" entry (file "inbox.org")
 	  ,(concat "* TODO Process \"%a\" %?\n"
-			   "/Entered on/ %U"))))
+			   "Entered on %U"))))
 
   ;; agenda config
   (org-agenda-files (list "everything.org" "inbox.org" "agenda.org" "notes.org"))
-:config
-(add-to-list 'org-modules 'org-habit t)
-:hook
-(org-mode . org-indent-mode) ;; Indent text
-;; The following prevents <> from auto-pairing when electric-pair-mode is on.
-;; Otherwise, org-tempo is broken when you try to <s TAB...
-(org-mode . (lambda ()
-			  (setq-local electric-pair-inhibit-predicate
-						  `(lambda (c)
-							 (if (char-equal c ?<) t (,electric-pair-inhibit-predicate c))))))
-)
+  ;; Refile
+  (setq org-refile-use-outline-path 'file)
+  (setq org-outline-path-complete-in-steps nil)
+  (setq org-refile-targets (quote ((nil :maxlevel . 9)
+								   (org-agenda-files :maxlevel . 9))))
+  :config
+  (add-to-list 'org-modules 'org-habit t)
+  :hook
+  (org-mode . org-indent-mode) ;; Indent text
+  ;; The following prevents <> from auto-pairing when electric-pair-mode is on.
+  ;; Otherwise, org-tempo is broken when you try to <s TAB...
+  (org-mode . (lambda ()
+				(setq-local electric-pair-inhibit-predicate
+							`(lambda (c)
+							   (if (char-equal c ?<) t (,electric-pair-inhibit-predicate c))))))
+  )
 
 (use-package toc-org
   :commands toc-org-enable