 
 ;; See Alsos
 
-(defn update-see-also-where! [where payload]
-  (update-where! cds/SeeAlsoComp where payload))
-
 (defn find-see-alsos-for [{:keys [ns name library-url]}]
   (->> (mon/fetch-one :see-alsos :where {:var.name name
                                          :var.ns ns


;; Examples

(defn insert-example! [payload]
  (insert! cds/ExampleComp payload))

(defn update-example-where! [where payload]
  (update-where! cds/ExampleComp where payload))

(defn update-example-by-id! [payload]
  (update-by-id! cds/ExampleComp payload))

(defn find-examples-for [{:keys [ns name library-url]}]
  (mon/fetch :examples
    :where {:var.name name


;; Notes

(defn find-notes-for [{:keys [ns name library-url]}]
  (mon/fetch :notes
    :where {:var.ns ns :var.name name :var.library-url library-url}
