                               :border        "none"})
 
                            ;; The popover point is zero width, therefore its absolute children will consider this width when deciding their
-                           ;; natural size and in particular, how they natually wrap text. The right hand size of the popover is used as a
+                           ;; natural size and in particular, how they natually wrap text. The right hand side of the popover is used as a
                            ;; text wrapping point so it will wrap, depending on where the child is positioned. The margin is also taken into
                            ;; consideration for this point so below, we set the margins to negative a lot to prevent
                            ;; this annoying wrapping phenomenon.

    :left   (if p-width (- (- p-width 25) position-offset) p-width)
    :above  (if p-height (- (- p-height 25) position-offset) p-height)))

(def popover-border-args-desc
  [{:name :children        :required true                        :type "vector"           :validate-fn sequential?       :description "a vector of component markups"}
   {:name :position        :required true                        :type "keyword atom"     :validate-fn position?         :description [:span "relative to this anchor. One of " position-options-list]}

       (fn [this]
         (let [pop-border-node (reagent/dom-node this)
               clipped?        (popover-clipping pop-border-node)
               anchor-node     (-> pop-border-node .-parentNode .-parentNode .-parentNode)] ;; Get reference to rc-point-wrapper node
           (when (and clipped? (not @found-optimal))
             (reset! position (calculate-optimal-position (calc-element-midpoint anchor-node)))
             (reset! found-optimal true))
           (calc-metrics @position)
           (reset! ready-to-show? true)))

       :reagent-render
       (fn
