status-im
/
reagent
mirror of https://github.com/status-im/reagent.git
2
0
Fork 0
Code Issues Projects Releases Wiki Activity

Fix component-path on React 16 + advanced optimized built

This commit is contained in:
Juho Teperi 2018-03-13 21:34:04 +02:00
parent 5f47f8e9f0
commit 3cc2c473cb
1 changed files with 11 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
src/reagent/impl/component.cljs
View File

@ -285,16 +285,21 @@
(defn component-path [c]
;; Alternative branch for React 16
(if-let [fiber (some-> c ($ :_reactInternalFiber))]
;; Try both original name (for UMD foreign-lib) and manged name (property access, for Closure optimized React)
(if-let [fiber (or (some-> c ($ :_reactInternalFiber))
(some-> c (.-_reactInternalFiber)))]
(fiber-component-path fiber)
(let [elem (or (some-> (or (some-> c ($ :_reactInternalInstance))
c)
($ :_currentElement)))
(let [instance (or (some-> c ($ :_reactInternalInstance))
(some-> c (.-_reactInternalInstance))
c)
elem (or (some-> instance ($ :_currentElement))
(some-> instance (.-_currentElement)))
name (some-> elem
($ :type)
($ :displayName))
path (some-> elem
($ :_owner)
owner (or (some-> elem ($ :_owner))
(some-> elem (.-_owner)))
path (some-> owner
component-path
(str " > "))
res (str path name)]