summaryrefslogtreecommitdiff
path: root/src/utils.clj
diff options
context:
space:
mode:
Diffstat (limited to 'src/utils.clj')
-rwxr-xr-xsrc/utils.clj3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/utils.clj b/src/utils.clj
index 9e4fc38..4c6905c 100755
--- a/src/utils.clj
+++ b/src/utils.clj
@@ -43,6 +43,9 @@
(and (re-find url-regex word)
(re-find pic-regex word)))
+(defn take-images [content]
+ (filter is-image? (.split content " ")))
+
(defn classify-msg [msg]
(let [words (.split msg " ")
imgs (map is-image? words)]