               (if retweeted_status
                 :retweet
                 (if-not (empty? (:urls entities))
-                  :source
+                  :source-or-share
                   :unrelated))))
           (transact-publications [{:keys [user _id entities created_at] :as tweet}]
             (let [uid (:_id (mc/find-one-as-map @db "users" {:id (:id user)}))

  [pub-id source-id]
  (mc/insert @db "reactions" {:publication pub-id :source source-id}))



(comment



(defn store-hashtag [text]
  (mc/insert-and-return
   @db
   "hashtags"
   {:text text}))
