Implements the ability to dig into history

src/cljs/auto_ap/views/pages/admin/history.cljs

@@ -1,40 +0,0 @@
-(ns auto-ap.views.pages.admin.history
-  (:require
-   [auto-ap.status :as status]
-   [auto-ap.subs :as subs]
-   [auto-ap.views.components.admin.side-bar :refer [admin-side-bar]]
-   [auto-ap.views.components.layouts :refer [side-bar-layout]]
-   [auto-ap.views.pages.admin.jobs.table :as table]
-   [auto-ap.views.components.modal :as modal]
-   [auto-ap.views.components :as com]
-   [auto-ap.views.pages.data-page :as data-page]
-   [auto-ap.views.utils :refer [dispatch-event with-user]]
-   [clojure.set :as set]
-   [re-frame.core :as re-frame]
-   [vimsical.re-frame.fx.track :as track]
-   [auto-ap.forms.builder :as form-builder]
-   [vimsical.re-frame.cofx.inject :as inject]
-   [auto-ap.forms :as forms]
-   [clojure.string :as str]
-   ["htmx.org" :as htmx]
-   ))
-
-;; VIEWS
-(def history-content
-  (let [c (atom nil)]
-    (with-meta
-      (fn []
-        (println "bothered?")
-        [:div {"hx-get" (.-pathname (.-location js/document))
-               "hx-trigger" "load"
-               "hx-swap" "outerHTML"
-               :ref (fn [i] (reset! c i))}
-         "test"])
-      {:should-component-update (fn [] false)
-       :component-did-mount (fn []
-                              (.process htmx @c))})))
-
-(defn history-page []
-  [side-bar-layout {:side-bar [admin-side-bar {}]
-                    :main     [history-content]}])
-