From 1cb72a5f7ac57f8d7a5f6dd336bd1424722ff7ac Mon Sep 17 00:00:00 2001 From: Adrian Tiberius Date: Tue, 6 Sep 2016 13:28:07 +0300 Subject: [PATCH] use only lower case tags --- src/status_im/discovery/screen.cljs | 2 +- src/status_im/profile/handlers.cljs | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/src/status_im/discovery/screen.cljs b/src/status_im/discovery/screen.cljs index 8b96f7a2c6..dc35aae848 100644 --- a/src/status_im/discovery/screen.cljs +++ b/src/status_im/discovery/screen.cljs @@ -17,7 +17,7 @@ [status-im.i18n :refer [label]])) (defn get-hashtags [status] - (let [hashtags (map #(str/replace % #"#" "") (re-seq #"[^ !?,;:.]+" status))] + (let [hashtags (map #(str/lower-case (str/replace % #"#" "")) (re-seq #"[^ !?,;:.]+" status))] (or hashtags []))) (defn title-content [platform-specific show-search?] diff --git a/src/status_im/profile/handlers.cljs b/src/status_im/profile/handlers.cljs index 7cbbe251ed..485942515d 100644 --- a/src/status_im/profile/handlers.cljs +++ b/src/status_im/profile/handlers.cljs @@ -8,7 +8,7 @@ [clojure.string :as str])) (defn get-hashtags [status] - (let [hashtags (map #(subs % 1) (re-seq #"#[^ !?,;:.]+" status))] + (let [hashtags (map #(str/lower-case (subs % 1)) (re-seq #"#[^ !?,;:.]+" status))] (or hashtags []))) (defn message-user [identity]