clientize.
This commit is contained in:
@@ -1,12 +1,10 @@
|
||||
(ns auto-ap.ssr.search
|
||||
(:require
|
||||
[auto-ap.graphql.utils :refer [can-see-client?]]
|
||||
[auto-ap.solr :as solr]
|
||||
[auto-ap.ssr.utils :refer [html-response]]
|
||||
[auto-ap.time :as atime]
|
||||
[clj-http.client :as client]
|
||||
[clojure.data.json :as json]
|
||||
[clojure.string :as str]
|
||||
[auto-ap.solr :as solr]
|
||||
[com.brunobonacci.mulog :as mu]))
|
||||
|
||||
(defn try-cleanse-date [d]
|
||||
@@ -55,7 +53,7 @@
|
||||
(into []
|
||||
(filter (fn [d]
|
||||
(can-see-client? id (first (:client_id d)))))
|
||||
(solr/query (q->solr-q q))))
|
||||
(solr/query solr/impl (q->solr-q q))))
|
||||
|
||||
|
||||
(defn search-results* [q id]
|
||||
|
||||
Reference in New Issue
Block a user