Skip to content

Instantly share code, notes, and snippets.

View tombarys's full-sized avatar

Tomáš Baránek tombarys

View GitHub Profile
@tombarys
tombarys / better-search.clj
Last active February 27, 2024 09:48
Better-search for Roam (V 2.11 improved + sorting)
(ns better-search-V2.1
(:require [reagent.core :as r]
[roam.datascript :as rd]
[roam.util :refer [parse]]))
(defn query-list [s-type search]
"creates a list of pages"
(sort (case s-type
:starts (rd/q '[:find ?fulltitle
:in $ ?search