          (let [user (-> node :tweet :user)]
              (conj users (:screen_name user)))
          users)
-       #_(if (zip/node loc)
+       (if (zip/node loc)
          (conj
           tokens
           (clojure.set/difference

                          "tweets"
                          {$and [{$or [{"retweeted_status.id_str" (:id_str tweet)}
                                       {"in_reply_to_status_id_str" (:id_str tweet)}]}
                                 {:created_at {$gt (t/date-time 2014 7 1)}}]})
          merged-articles (into related-origins related-tweets)]
      (zip/zipper
       (fn [node] true)

  (loop [counter 0
         max-path 0
         users []
         tokens []
         pub-times []
         hashtags []
         delays []
