Remove algolia

Author: devn

config.edn

@@ -1,7 +1,4 @@
 {
- getclojure.algolia/algolia-app-id #config/env "ALGOLIA_APP_ID"
- getclojure.algolia/algolia-admin-api-key #config/env "ALGOLIA_ADMIN_API_KEY"
- getclojure.algolia/algolia-index #config/env "ALGOLIA_INDEX"
  getclojure.elastic/elastic-url #config/env "BONSAI_URL"
  getclojure.elastic/index-name #config/env "INDEX_NAME"
  getclojure.config/env #config/env "APP_ENV"

env.example

@@ -1,7 +1,3 @@
-export DB_URL="jdbc:postgresql://localhost:5432/getclojure?user=postgres&password=postgres"
-export ALGOLIA_ADMIN_API_KEY="abc123"
-export ALGOLIA_INDEX="index_name"
-export ALGOLIA_APP_ID="APPID"
 export APP_ENV="development"
 export BONSAI_URL="https://foo:[email protected]:123"
 export INDEX_NAME="getclojure"

project.clj

@@ -5,16 +5,13 @@
             :url "http://www.eclipse.org/legal/epl-v10.html"}
   :dependencies [[org.clojure/clojure "1.11.1"]
                  [org.babashka/sci "0.3.5"]
-                 [cheshire "5.10.2"]
                  [ring/ring-jetty-adapter "1.9.5"]
                  [ring/ring-defaults "0.3.3"]
                  [compojure "1.6.2"]
                  [hiccup "1.0.5"]
                  [com.github.seancorfield/next.jdbc "1.2.780"]
                  [org.postgresql/postgresql "42.3.4"]
                  [com.outpace/config "0.13.5"]
-                 [com.algolia/algoliasearch-core "3.16.5"]
-                 [com.algolia/algoliasearch-java-net "3.16.5"]
                  [enlive "1.1.6"]
                  [com.taoensso/timbre "5.2.1"]
                  [prismatic/schema "1.2.1"]
@@ -39,8 +36,7 @@
             "extract-sexp-input-file" ["trampoline" "run" "-m" "getclojure.extract" "sexps"]
             ;; Generate files for seed, analysis, and presentation
             "gen-working-sexps" ["trampoline" "run" "-m" "getclojure.sexp" "working"]
-            "gen-formatted-sexps" ["trampoline" "run" "-m" "getclojure.sexp" "formatted"]
-            "gen-algolia-json" ["trampoline" "run" "-m" "getclojure.sexp" "algolia"]}
+            "gen-formatted-sexps" ["trampoline" "run" "-m" "getclojure.sexp" "formatted"]}
   :jvm-opts ["--add-modules" "jdk.incubator.foreign"
              "--enable-native-access=ALL-UNNAMED"]
   :min-lein-version "2.0.0")

src/getclojure/algolia.clj

@@ -1,7 +1,6 @@
 (ns getclojure.sexp
   (:refer-clojure :exclude [eval])
   (:require
-   [cheshire.core :as json]
    [clojure.java.io :as io]
    [clojure.string :as str]
    [getclojure.format :as fmt]
@@ -138,19 +137,6 @@
        format-coll
        (spit "resources/sexps/formatted-sexps.edn")))
 
-(s/defn generate-algolia-json-file
-  "Provided a `filename`, reads a file containing a collection of maps of the
-  form {:input ... :output ... :value ...} and writes to a file a json-encoded
-  collection of the form: [{\"input\" ... \"value\" ... \"output\" ...
-  \"formatted-input\" ... \"formatted-value\" ... \"formatted-output\" ...}] for
-  uploading to an algolia index."
-  [filename :- s/Str]
-  (log/info "Generating algolia output.json")
-  (spit "output.json"
-        (->> (read-resource filename)
-             format-coll
-             (json/encode))))
-
 (s/defn generate-working-sexps-file
   [filename :- s/Str]
   (log/info "Generating working-sexps.edn")
@@ -160,11 +146,9 @@
   (let [op (first args)]
     (case op
       "working" (generate-working-sexps-file "sexps/input.edn")
-      "algolia" (generate-algolia-json-file "sexps/working-sexps.edn")
       "formatted" (generate-formatted-collection "sexps/working-sexps.edn")
-      (do (println "Valid arguments: working, algolia, or formatted.")
+      (do (println "Valid arguments: working, formatted.")
           (println " - `working` produces `sexps/working-sexps.edn` from `sexps/input.edn` which contains all s-expressions which run in SCI")
-          (println " - `algolia` produces `output.json` from `sexps/working-sexps.edn` for consumption by Algolia")
           (println " - `formatted` produces `sexps/formatted-sexps.edn` from `sexps/working-sexps.edn` for ElasticSearch"))))
 
   (shutdown-agents)