clojure.string/ -> string/

This commit is contained in:
Arnout Engelen 2020-03-03 22:29:17 +01:00
parent 307e98023d
commit 3512b4c045

View file

@ -61,7 +61,7 @@
(reduced (str text "...")) (reduced (str text "..."))
(str text " " word))) (str text " " word)))
"" ""
(clojure.string/split text #" ")) (string/split text #" "))
:else text)) :else text))
@ -144,7 +144,7 @@
; If the text ends in a link to the media (which is uploaded anyway), ; If the text ends in a link to the media (which is uploaded anyway),
; chop it off instead of including the link in the toot ; chop it off instead of including the link in the toot
(defn chop-tail-media-url [text media] (defn chop-tail-media-url [text media]
(clojure.string/replace text #" (\S+)$" #(if (in (%1 1) (map :url media)) "" (%1 0)))) (string/replace text #" (\S+)$" #(if (in (%1 1) (map :url media)) "" (%1 0))))
(defn parse-tweet [{created-at :created_at (defn parse-tweet [{created-at :created_at
text :full_text text :full_text