Commit 6ddc0abd authored by arturo's avatar arturo

>>> continue

parent 294c3bcd
Pipeline #2493 failed with stage
...@@ -5,6 +5,7 @@ module Gargantext.Components.Nodes.Corpus.Phylo ...@@ -5,6 +5,7 @@ module Gargantext.Components.Nodes.Corpus.Phylo
import Gargantext.Prelude import Gargantext.Prelude
import DOM.Simple (document, querySelector) import DOM.Simple (document, querySelector)
import DOM.Simple.Console (log)
import Data.Maybe (Maybe(..)) import Data.Maybe (Maybe(..))
import FFI.Simple ((..), (.=)) import FFI.Simple ((..), (.=))
import Gargantext.Components.App.Data (Boxes) import Gargantext.Components.App.Data (Boxes)
...@@ -69,6 +70,8 @@ contentCpt = here.component "content" cpt where ...@@ -69,6 +70,8 @@ contentCpt = here.component "content" cpt where
-- Hooks -- Hooks
useFirstEffect' do useFirstEffect' do
-- @WIP
log dataset
-- @XXX: inopinent <div> (see Gargantext.Components.Router) (@TODO?) -- @XXX: inopinent <div> (see Gargantext.Components.Router) (@TODO?)
mEl <- querySelector document ".main-page__main-route .container" mEl <- querySelector document ".main-page__main-route .container"
case mEl of case mEl of
......
...@@ -1230,7 +1230,6 @@ function drawPhylo(branches, periods, groups, links, aLinks, bLinks, frame) { ...@@ -1230,7 +1230,6 @@ function drawPhylo(branches, periods, groups, links, aLinks, bLinks, frame) {
/* labels */ /* labels */
var firstDate = Math.min(...groups.map(g => (g.from).getFullYear())) var firstDate = Math.min(...groups.map(g => (g.from).getFullYear()))
var yLabels = (periods.map(p => ({y:p.y,from:p.from,to:p.to,label:(p.from).getFullYear()}))).filter(p => p.label >= firstDate); var yLabels = (periods.map(p => ({y:p.y,from:p.from,to:p.to,label:(p.from).getFullYear()}))).filter(p => p.label >= firstDate);
var xLabels = toXLabels(branches,groups,frame[2]); var xLabels = toXLabels(branches,groups,frame[2]);
......
...@@ -194,7 +194,7 @@ sessionPath (R.ChartHash { chartType, listId, tabType } i) = ...@@ -194,7 +194,7 @@ sessionPath (R.ChartHash { chartType, listId, tabType } i) =
<> "&listType=" <> show MapTerm -- listId <> "&listType=" <> show MapTerm -- listId
<> defaultListAddMaybe listId <> defaultListAddMaybe listId
-- sessionPath (R.NodeAPI (NodeContact s a i) i) = sessionPath $ "annuaire/" <> show a <> "/contact/" <> show i -- sessionPath (R.NodeAPI (NodeContact s a i) i) = sessionPath $ "annuaire/" <> show a <> "/contact/" <> show i
sessionPath (R.PhyloAPI nId) = "node/" <> show nId sessionPath (R.PhyloAPI nId) = "node/" <> show nId <> "/phylo"
------- misc routing stuff ------- misc routing stuff
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment