From a08c5346ae55a325fa372dae198cf6b0b3611567 Mon Sep 17 00:00:00 2001 From: Michiel Borkent Date: Sun, 27 Dec 2020 12:37:44 +0100 Subject: [PATCH] wip --- examples/bootleg.clj | 10 ---------- examples/brisk.clj | 10 ---------- examples/clj-kondo.clj | 10 ---------- examples/filewatcher.clj | 10 ---------- examples/hsqldb.clj | 13 ------------- examples/lanterna.clj | 33 --------------------------------- examples/parcera.clj | 8 -------- examples/tabl.clj | 10 ---------- examples/tzzh_aws.clj | 34 ---------------------------------- examples/tzzh_mail.clj | 16 ---------------- 10 files changed, 154 deletions(-) delete mode 100644 examples/bootleg.clj delete mode 100755 examples/brisk.clj delete mode 100755 examples/clj-kondo.clj delete mode 100755 examples/filewatcher.clj delete mode 100644 examples/hsqldb.clj delete mode 100644 examples/lanterna.clj delete mode 100644 examples/parcera.clj delete mode 100755 examples/tabl.clj delete mode 100644 examples/tzzh_aws.clj delete mode 100644 examples/tzzh_mail.clj diff --git a/examples/bootleg.clj b/examples/bootleg.clj deleted file mode 100644 index 25c9beb..0000000 --- a/examples/bootleg.clj +++ /dev/null @@ -1,10 +0,0 @@ -(require '[babashka.pods :as pods]) - -(pods/load-pod 'retrogradeorbit/bootleg "0.1.9") - -(require '[pod.retrogradeorbit.bootleg.utils :as utils]) - -(-> [:div - [:h1 "Using Bootleg From Babashka"] - [:p "This is a demo"]] - (utils/convert-to :html)) diff --git a/examples/brisk.clj b/examples/brisk.clj deleted file mode 100755 index a00e9a1..0000000 --- a/examples/brisk.clj +++ /dev/null @@ -1,10 +0,0 @@ -#!/usr/bin/env bb - -(require '[babashka.pods :as pods]) - -(pods/load-pod 'justone/brisk "0.2.0") - -(require '[pod.brisk :as brisk]) - -(brisk/freeze-to-file "pod.nippy" {:han :solo}) -(prn (brisk/thaw-from-file "pod.nippy")) diff --git a/examples/clj-kondo.clj b/examples/clj-kondo.clj deleted file mode 100755 index 861ff5a..0000000 --- a/examples/clj-kondo.clj +++ /dev/null @@ -1,10 +0,0 @@ -#!/usr/bin/env bb - -(require '[babashka.pods :as pods]) - -(pods/load-pod 'borkdude/clj-kondo "2020.12.12") - -(require '[pod.borkdude.clj-kondo :as clj-kondo]) - -(-> (clj-kondo/run! {:lint ["src"]}) - :summary) diff --git a/examples/filewatcher.clj b/examples/filewatcher.clj deleted file mode 100755 index d0233d0..0000000 --- a/examples/filewatcher.clj +++ /dev/null @@ -1,10 +0,0 @@ -#!/usr/bin/env bb - -(require '[babashka.pods :as pods]) -(pods/load-pod 'org.babashka/filewatcher "0.0.1-SNAPSHOT") - -(require '[pod.babashka.filewatcher :as fw]) - -(fw/watch "/tmp" (fn [event] (prn event)) {:delay-ms 50}) - -@(promise) diff --git a/examples/hsqldb.clj b/examples/hsqldb.clj deleted file mode 100644 index e9819da..0000000 --- a/examples/hsqldb.clj +++ /dev/null @@ -1,13 +0,0 @@ -(require '[babashka.pods :as pods]) - -(pods/load-pod 'org.babashka/hsqldb "0.0.1") - -(require '[pod.babashka.hsqldb :as db]) - -(def db "jdbc:hsqldb:mem:testdb;sql.syntax_mys=true") - -(db/execute! db ["create table foo ( foo int );"]) - -(db/execute! db ["insert into foo values (1, 2, 3);"]) - -(db/execute! db ["select * from foo;"]) diff --git a/examples/lanterna.clj b/examples/lanterna.clj deleted file mode 100644 index 83a0633..0000000 --- a/examples/lanterna.clj +++ /dev/null @@ -1,33 +0,0 @@ -(require '[babashka.pods :refer [load-pod]]) - -(load-pod 'org.babashka/lanterna "0.0.1-SNAPSHOT" {#_#_:force true #_#_:transport :socket}) - -(require '[pod.babashka.lanterna.terminal :as terminal]) - -(def terminal (terminal/get-terminal)) - -(terminal/start terminal) - -(terminal/put-string terminal - (str "Hello TUI Babashka!") - 10 5) -(terminal/put-string terminal - (str "The size of this terminal: " - (terminal/get-size terminal)) - 10 6) -(terminal/put-string terminal - "Press q to exit." - 10 7) - -(terminal/flush terminal) - -(def k (terminal/get-key-blocking terminal)) - -(terminal/put-string terminal - (str "You pressed: " k) - 10 8) - -(Thread/sleep 1000) - -(terminal/stop terminal) - diff --git a/examples/parcera.clj b/examples/parcera.clj deleted file mode 100644 index b3c7727..0000000 --- a/examples/parcera.clj +++ /dev/null @@ -1,8 +0,0 @@ -(require '[babashka.pods :as pods]) -(pods/load-pod 'org.babashka/parcera "0.0.1-SNAPSHOT") -(require '[pod.babashka.parcera :as parcera]) - -(prn (parcera/ast "(ns foo)")) -;;=> (:code (:list (:symbol "ns") (:whitespace " ") (:symbol "foo"))) - -(prn (parcera/code (parcera/ast "(ns foo)"))) diff --git a/examples/tabl.clj b/examples/tabl.clj deleted file mode 100755 index ff936ae..0000000 --- a/examples/tabl.clj +++ /dev/null @@ -1,10 +0,0 @@ -#!/usr/bin/env bb - -(require '[babashka.pods :as pods]) -(pods/load-pod 'justone/tabl "0.2.0") - -(require '[pod.tabl.fancy :as fancy]) -(require '[pod.tabl.doric :as doric]) - -(fancy/print-table [{:foo 1 :bar 2} {:foo 2 :bar 3}]) -(doric/print-table [{:foo 1 :bar 2} {:foo 2 :bar 3}]) diff --git a/examples/tzzh_aws.clj b/examples/tzzh_aws.clj deleted file mode 100644 index 0fb7be5..0000000 --- a/examples/tzzh_aws.clj +++ /dev/null @@ -1,34 +0,0 @@ -(require '[babashka.pods :as pods]) -(pods/load-pod 'tzzh/aws "0.0.3") -(require '[pod.tzzh.dynamodb :as d]) -(require '[pod.tzzh.s3 :as s3]) -(require '[pod.tzzh.paginator :as p]) - - -(d/list-tables) - -(d/batch-get-item {:RequestItems - {"AmazingTable" {:Keys [{:some-property {:S "SomeValue"} - :something-else {:S "SomethingSomething"}}]}}}) - -(d/batch-write-item {:RequestItems - {"AmazingTable" [{:PutRequest {:Item {:some-property {:S "abxdggje"} - :something-else {:S "zxcmbnj"} - :another-thing {:S "asdasdsa"}}}}]}}) - -(d/get-item {:Key {:lalala {:S "zzzzzzzz"} - :bbbbbb {:S "abxbxbxx"}} - :TableName "SomeTable"}) - -(d/describe-table {:TableName "SomeTable"}) - -(s3/list-buckets) - -;; Paginators example -(let [s3-paginator (p/get-paginator s3/list-objects-v2-pages)] - (s3-paginator {:Bucket "some-bucket" - :Prefix "some-prefix/something/"})) -;; this returns a list of all the pages i.e a list of ListObjectsV2Output that are lazily fetched - -(let [glue-paginator (p/get-paginator g/list-crawlers)] - (glue-paginator)) diff --git a/examples/tzzh_mail.clj b/examples/tzzh_mail.clj deleted file mode 100644 index 337ae86..0000000 --- a/examples/tzzh_mail.clj +++ /dev/null @@ -1,16 +0,0 @@ -(require '[babashka.pods :as pods]) -(pods/load-pod 'tzzh/mail "0.0.2") -(require '[pod.tzzh.mail :as m]) - -(m/send-mail {:host "smtp.gmail.com" - :port 587 - :username "kylian.mbappe@gmail.com" - :password "kylian123" - :subject "Subject of the email" - :from "kylian.mbappe@gmail.com" - :to ["somebody@somehwere.com"] - :cc ["somebodyelse@somehwere.com"] - :text "aaa" ;; for text body - :html " kajfhajkfhakjs " ;; for html body - :attachments ["./do-everything.clj"] ;; paths to the files to attch - })