                  (when (-> node :attr :text)
                    (dom/div {:class "txt"} 
                             (-> node :attr :text)))
-                 (dom/ol
-                  (om/build-all outline-body (:children node) {:state state}))
+                 (when (and (not (empty? (:children node)))
+                            (not (:closed node)))
+                   (dom/ol
+                     (om/build-all outline-body (:children node) {:state state})))
                  ))) 
 
 (defcomponent component [data owner]

                                                     (assoc-in destination-path             new-destination-children)
                                                     (assoc-in (conj parent-path :children) new-parent-children)
                                                  )))))
                             (recur) 
                             )))

                        ; click events

                                                                (conj destination-path (dec (count new-destination-children))))
                                                 (-> d
                                                     (assoc-in (conj parent-path :children) new-parent-children)
                                                     (update-in up-path dissoc :closed)
                                                     (assoc-in destination-path             new-destination-children)
                                                  )))))
                             :left-shift-node
