       (.scrollIntoView el))))
 
 (defn ^:private page-cell [page owner opts]
+  (assert (:view opts))
   (reify
     om/IDidMount
     (did-mount [_]

        (om/build-all page-cell pages
                      {:key :id
                       :init-state {:events events}
                       :state {:current-page current-page}})]))))

(defn ^:private meta-pane [document owner]
  (om/component

                      {:key :id
                       :init-state {:events events}
                       :state {:current-page current-page}
                       :opts {:enable-rotate? true
                              :view page/thumbnail}})]))))

(defn ^:private pages-pane-header [document]
  (om/component
