scroll_reveal.cljs

(ns scroll-reveal
  (:require
   ["scrollreveal" :as scroll-reveal]))

(defonce sr (scroll-reveal))

(defn reveal
  [element options]
  (.reveal sr element (clj->js options)))

;; inside a component

(defn component
  []
  (let [!refs (atom {:foo nil})]
    (r/create-class
     {:component-did-mount
      (fn []
        (scroll-reveal/reveal (:foo @!refs) {:origin "left"
                                             :distance "500px"
                                             :duration 1000})
        :reagent-render
        (fn []
          [:div.w-50
           {:ref (fn [com]
                   (swap! !refs assoc :foo com))
            :style {:visibility "hidden"}}
           [:p "234"]]))})))