      (into-array ["doctype" "docid" "name" "citations"
                   "date" "court" "size"]))
 
-
-
 (defn apply-page-options [this solr-query]
   (let [params (get-query-params this)
         page (if-let [p (.get params "page")]
                (Integer/parseInt p) 1)]
-    (.setStart solr-query (* *page-size* (dec page)))))
+    (.setStart solr-query (* p/*page-size* (dec page)))))
 
 (defn execute-search [this solr-query]
   (let [solr (.. this getContext getAttributes (get "org.altlaw.solr.server"))]

                   (print "</pre>"))
                 (.getMessage (stacktrace/root-cause (:exception data))))))

(defn render-exception MediaType/TEXT_HTML [this variant data]
  (StringRepresentation.
   (html-exception data)
   MediaType/TEXT_HTML

(ns org.altlaw.www.SearchResource
  (:require [org.altlaw.www.render :as tmpl]
            [org.altlaw.www.references :as r]
            [org.altlaw.www.pagination :as p]
            [org.altlaw.util.date :as date]
            [org.altlaw.util.courts :as courts]
            [org.altlaw.util.context :as context]
