use only lower case tags
This commit is contained in:
parent
773610a3cf
commit
1cb72a5f7a
|
@ -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?]
|
||||
|
|
|
@ -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]
|
||||
|
|
Loading…
Reference in New Issue