add(org-roam): custom command to filter on a tag

config.org

@@ -957,7 +957,7 @@ Preserve indentation in SRC blocks
   (org-roam-completion-everywhere t)
   :config
   (org-roam-setup)
-  (setq org-roam-node-display-template (concat "${title:*} " (propertize "${tags:10}" 'face 'org-tag)))
+  (setq org-roam-node-display-template (concat "${title:*} " (propertize "${tags}" 'face 'org-tag)))
   (org-roam-db-autosync-mode)
   ;; Add todo lists to org-agenda
   (custom-set-variables '(org-agenda-files (directory-files-recursively org-roam-directory "todo\\.org$")))
@@ -1034,6 +1034,22 @@ Preserve indentation in SRC blocks
 
 * Custom
 
+** Org-roam
+
+Inspired by https://github.com/org-roam/org-roam/wiki/User-contributed-Tricks#filter-by-a-tag .
+
+#+BEGIN_SRC emacs-lisp
+(defun myrmi/org-roam-node-find-tag-filter ()
+  "Select a single tag from list and filter `org-roam-node' by it."
+  (interactive)
+  (let ((tag (car (completing-read-multiple "Tag: "
+                                            (org-roam-tag-completions)))))
+    (org-roam-node-find nil nil
+                        (lambda (node)
+                          (member tag
+                                  (org-roam-node-tags node))))))
+#+END_SRC
+
 ** Sudo current buffer
 
 #+BEGIN_SRC emacs-lisp