From 33b8a7c60839b2a83a5d0d2c3c85ca147c9a5f74 Mon Sep 17 00:00:00 2001
From: Craig Jennings <c@cjennings.net>
Date: Mon, 1 Sep 2025 12:52:06 -0500
Subject: wip webclipper and org-capture issues

---
 modules/org-roam-config.el | 22 +++++++++++++++++++++-
 1 file changed, 21 insertions(+), 1 deletion(-)

(limited to 'modules/org-roam-config.el')

diff --git a/modules/org-roam-config.el b/modules/org-roam-config.el
index be0c0876..1f1524aa 100644
--- a/modules/org-roam-config.el
+++ b/modules/org-roam-config.el
@@ -23,6 +23,16 @@
    '(("d" "default" plain "%?"
       :if-new (file+head "%<%Y%m%d%H%M%S>-${slug}.org" "#+TITLE: ${title}\n")
       :unnarrowed t)
+     ("w" "webclip" plain "%?"
+      :if-new (file+head "%<%Y%m%d%H%M%S>-${slug}.org" "#+TITLE: ${title}
+#+FILETAGS: webclipped
+#+ROAM_KEY: ${url}
+URL: ${url}
+Captured On: %U
+
+${body}")
+      :unnarrowed t
+      :immediate-finish t)
      ("v" "v2mom" plain
       (function (lambda () (concat roam-dir "templates/v2mom.org")))
       :if-new (file+head "%<%Y%m%d%H%M%S>-${slug}.org" "#+TITLE: ${title}\n")
@@ -30,7 +40,7 @@
      ("r" "recipe" plain
       (function (lambda () (concat roam-dir "templates/recipe.org")))
       :if-new (file+head "%<%Y%m%d%H%M%S>-${slug}.org" "#+TITLE: ${title}
-	  #+CATEGORY: ${title}\n#+FILETAGS: Recipe\n#+STARTUP: showall")
+      #+CATEGORY: ${title}\n#+FILETAGS: Recipe\n#+STARTUP: showall")
       :unnarrowed t)
      ("p" "project" plain
       (function (lambda () (concat roam-dir "templates/project.org")))
@@ -49,6 +59,7 @@
          ("C-c n r" . cj/org-roam-find-node-recipe)
          ("C-c n t" . cj/org-roam-find-node-topic)
          ("C-c n i" . org-roam-node-insert)
+         ("C-c n w" . cj/org-roam-find-node-webclip)
          :map org-mode-map
          ("C-M-i" . completion-at-point)
          :map org-roam-dailies-map
@@ -140,6 +151,15 @@ created nodes are added to the agenda and follow a template defined by
   (interactive)
   (cj/org-roam-find-node "Project" "p" (concat roam-dir "templates/project.org")))
 
+(defun cj/org-roam-find-node-webclip ()
+  "List nodes of type 'webclipped' in completing read for selection."
+  (interactive)
+  (org-roam-node-find
+   nil
+   nil
+   (cj/org-roam-filter-by-tag "webclipped")
+   nil))
+
 ;; ---------------------- Org Capture After Finalize Hook ----------------------
 
 (defun cj/org-roam-add-node-to-agenda-files-finalize-hook ()
-- 
cgit v1.2.3