meissa/mastodon-bot
Archived
7
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Restore twitter tests

Browse source
This commit is contained in:
Arnout Engelen 2020-06-27 19:59:26 +02:00
parent f00b84c75a
commit 5c19be147c
No known key found for this signature in database
GPG key ID: 061107B0F74A6DAA
2 changed files with 25 additions and 25 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

25
src/test/mastodon_bot/core_test.cljs
View file

@ -1,25 +0,0 @@
(ns mastodon-bot.core-test
(:require
[cljs.test :refer-macros [deftest is testing run-tests]]
[cljs.reader :as edn]
["fs" :as fs]
[mastodon-bot.core :as core]
))
;; (deftest test-read-config
;; (is (= 300 core/max-post-length)))
;; (defn readfile [filename]
;; (-> filename (fs/readFileSync #js {:encoding "UTF-8"}) edn/read-string))
;; (deftest test-remove-link-to-image
;; (is (=
;; "Mensen vragen om meer foto's in SPAMSPAMSPAM, dus bij deze achteraf de nieuwe kasten voor de projectenkast en de bookcrossingzone. Te vinden direct bij binnenkomst op de eerste en tweede verdieping."
;; (:text (core/parse-tweet (readfile "testdata/twitter/tweet-with-link-to-image.edn")))
;; )))
;; (deftest test-parse-normal-tweet-text
;; (is (=
;; "Daar is 'ie dan! SPAMSPAMSPAM editie 2! Met een samenvatting van wat er in deze eerste twee maanden van 2020 gebeurd en gedaan is binnen @hack42. Lees het via: \nhttps://t.co/O1YzlWTFU3 #hackerspace #nieuws #arnhem #nuarnhem"
;; (:text (core/parse-tweet (readfile "testdata/twitter/normal-tweet.edn")))
;; )))

25
src/test/mastodon_bot/twitter_api_test.cljs Normal file
View file

@ -0,0 +1,25 @@
(ns mastodon-bot.twitter-api-test
(:require
[cljs.test :refer-macros [deftest is testing run-tests]]
[clojure.spec.alpha :as s]
[cljs.reader :as edn]
["fs" :as fs]
[mastodon-bot.twitter-api :as sut]
))
(defn readfile [filename]
(-> filename (fs/readFileSync #js {:encoding "UTF-8"}) edn/read-string))
(def testconfig (readfile "test.edn"))
(deftest test-parse-normal-tweet-text
(is (=
"Daar is 'ie dan! SPAMSPAMSPAM editie 2! Met een samenvatting van wat er in deze eerste twee maanden van 2020 gebeurd en gedaan is binnen @hack42. Lees het via: \nhttps://t.co/O1YzlWTFU3 #hackerspace #nieuws #arnhem #nuarnhem"
(:text (sut/parse-tweet (readfile "testdata/twitter/normal-tweet.edn")))
)))
(deftest test-remove-link-to-image
(is (=
"Mensen vragen om meer foto's in SPAMSPAMSPAM, dus bij deze achteraf de nieuwe kasten voor de projectenkast en de bookcrossingzone. Te vinden direct bij binnenkomst op de eerste en tweede verdieping."
(:text (sut/parse-tweet (readfile "testdata/twitter/tweet-with-link-to-image.edn")))
)))