   "Performs a search restricted to one page of search results."
   (go
     (let [results-ch (http/post url {:json-params (merge params {:step 1 :cut page-size})
-                                     :headers {"Accept" "application/json"}})
+                                     :headers     {"Accept" "application/json"}})
           {:keys [status success] {{search :table} :search
-                                   :keys [result]} :body :as response} (<! results-ch)]
+                                   :keys           [result]} :body :as response} (<! results-ch)]
       (if-not success
         (.log js/console status)
         (do

    (let [results-ch (http/post url {:json-params (merge params {:step      2
                                                                 :cut       (* 20 page-size)
                                                                 :search_id search-id})
                                     :headers {"Accept" "application/json"}})
          {:keys [status success] {{{num-hits :num_hits} :table} :search} :body} (<! results-ch)]
      (if-not success
        (.log js/console status)

            url    (str "search_engines/" (:search-engine @corpus "cwb") "_searches")
            params {:corpus_id (:rid @corpus)
                    :queries   q
                    :max_hits  2000
                    :sort_by   (name @sort-by)}]
        (reset! show? true)
        (reset! results nil)
