diff options
Diffstat (limited to 'src/utils.clj')
| -rwxr-xr-x | src/utils.clj | 3 |
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)] |
