fix chop
This commit is contained in:
parent
9cfb0fb992
commit
a0adf99dc3
1 changed files with 3 additions and 0 deletions
|
@ -33,6 +33,9 @@
|
|||
(defn strip-utm [news-link]
|
||||
(first (string/split news-link #"\?utm")))
|
||||
|
||||
(defn in [needle haystack]
|
||||
(some (partial = needle) haystack))
|
||||
|
||||
; 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
|
||||
(defn chop-tail-media-url [text media]
|
||||
|
|
Reference in a new issue