Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
P
purescript-gargantext
Project
Project
Details
Activity
Releases
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
Grégoire Locqueville
purescript-gargantext
Commits
3f61cc3a
Commit
3f61cc3a
authored
Dec 04, 2020
by
Alexandre Delanoë
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
[FIX] commenting unfinished features
parent
e30994ec
Changes
4
Show whitespace changes
Inline
Side-by-side
Showing
4 changed files
with
45 additions
and
37 deletions
+45
-37
FacetsTable.purs
src/Gargantext/Components/FacetsTable.purs
+10
-8
NgramsTable.purs
src/Gargantext/Components/NgramsTable.purs
+24
-26
Components.purs
src/Gargantext/Components/NgramsTable/Components.purs
+1
-1
Tabs.purs
src/Gargantext/Components/Nodes/Lists/Tabs.purs
+10
-2
No files found.
src/Gargantext/Components/FacetsTable.purs
View file @
3f61cc3a
...
@@ -51,7 +51,9 @@ type Props =
...
@@ -51,7 +51,9 @@ type Props =
)
)
-- | Tracks the ids of documents to delete and that have been deleted
-- | Tracks the ids of documents to delete and that have been deleted
type Deletions = { pending :: Set Int, deleted :: Set Int }
type Deletions = { pending :: Set Int
, deleted :: Set Int
}
initialDeletions :: Deletions
initialDeletions :: Deletions
initialDeletions = { pending: mempty, deleted: mempty }
initialDeletions = { pending: mempty, deleted: mempty }
...
...
src/Gargantext/Components/NgramsTable.purs
View file @
3f61cc3a
...
@@ -319,8 +319,8 @@ loadedNgramsTableCpt = R.hooksComponentWithModule thisModule "loadedNgramsTable"
...
@@ -319,8 +319,8 @@ loadedNgramsTableCpt = R.hooksComponentWithModule thisModule "loadedNgramsTable"
, versioned: Versioned { data: initTable }
, versioned: Versioned { data: initTable }
, withAutoUpdate } _ = do
, withAutoUpdate } _ = do
let syncResetBtns = [
let syncResetBtns = [
syncResetButtons
syncResetButtons
{ afterSync: chartsAfterSync
{ afterSync: chartsAfterSync
, ngramsLocalPatch
, ngramsLocalPatch
, performAction: performAction <<< CoreAction
, performAction: performAction <<< CoreAction
}
}
...
@@ -328,8 +328,8 @@ loadedNgramsTableCpt = R.hooksComponentWithModule thisModule "loadedNgramsTable"
...
@@ -328,8 +328,8 @@ loadedNgramsTableCpt = R.hooksComponentWithModule thisModule "loadedNgramsTable"
pure $ R.fragment $
pure $ R.fragment $
autoUpdate <> syncResetBtns <> [
autoUpdate <> syncResetBtns <> [
H.h4 {style: {textAlign : "center"}}
[
H.h4 {style: {textAlign : "center"}}
H.span {className: "glyphicon glyphicon-hand-down"} []
[
H.span {className: "glyphicon glyphicon-hand-down"} []
, H.text "Extracted Terms"
, H.text "Extracted Terms"
]
]
, search
, search
...
@@ -648,9 +648,7 @@ mainNgramsTablePaintCpt = R.hooksComponentWithModule thisModule "mainNgramsTable
...
@@ -648,9 +648,7 @@ mainNgramsTablePaintCpt = R.hooksComponentWithModule thisModule "mainNgramsTable
, withAutoUpdate } _ = do
, withAutoUpdate } _ = do
pathS <- R.useState' path
pathS <- R.useState' path
state <- R.useState' $ initialState versioned
state <- R.useState' $ initialState versioned
pure $ loadedNgramsTable { afterSync
pure $ loadedNgramsTable {
afterSync
, appReload
, appReload
, asyncTasksRef
, asyncTasksRef
, path: pathS
, path: pathS
...
@@ -662,8 +660,8 @@ mainNgramsTablePaintCpt = R.hooksComponentWithModule thisModule "mainNgramsTable
...
@@ -662,8 +660,8 @@ mainNgramsTablePaintCpt = R.hooksComponentWithModule thisModule "mainNgramsTable
, withAutoUpdate
, withAutoUpdate
}
}
type MainNgramsTablePaintNoCacheProps =
(
type MainNgramsTablePaintNoCacheProps =
pathS :: R.State PageParams
(
pathS :: R.State PageParams
, versioned :: VersionedNgramsTable
, versioned :: VersionedNgramsTable
| CommonProps
| CommonProps
)
)
...
...
src/Gargantext/Components/NgramsTable/Components.purs
View file @
3f61cc3a
...
@@ -46,7 +46,7 @@ searchInputCpt = R.hooksComponentWithModule thisModule "searchInput" cpt
...
@@ -46,7 +46,7 @@ searchInputCpt = R.hooksComponentWithModule thisModule "searchInput" cpt
cpt { onSearch, searchQuery } _ =
cpt { onSearch, searchQuery } _ =
pure $ H.div { className: "input-group" }
pure $ H.div { className: "input-group" }
[ searchButton
[ searchButton
, fieldInput
searchQuery
, fieldInput
]
]
where
where
searchButton =
searchButton =
...
...
src/Gargantext/Components/Nodes/Lists/Tabs.purs
View file @
3f61cc3a
...
@@ -153,8 +153,15 @@ ngramsViewCpt = R.hooksComponentWithModule thisModule "ngramsView" cpt
...
@@ -153,8 +153,15 @@ ngramsViewCpt = R.hooksComponentWithModule thisModule "ngramsView" cpt
}
}
charts params CTabTerms (chartType /\ setChartType) _ = [
charts params CTabTerms (chartType /\ setChartType) _ = [
H.div { className: "row chart-type-selector" } [
H.div {className: "row"}
H.div { className: "col-md-3" } [
[ H.div {className: "col-md-offset-5 col-md-6 content"}
[ H.img { src: "images/Gargantextuel-212x300.jpg"
, id: "funnyimg"
}
]
]
{-
R2.select { className: "form-control"
R2.select { className: "form-control"
, defaultValue: show chartType
, defaultValue: show chartType
, on: { change: \e -> setChartType
, on: { change: \e -> setChartType
...
@@ -173,6 +180,7 @@ ngramsViewCpt = R.hooksComponentWithModule thisModule "ngramsView" cpt
...
@@ -173,6 +180,7 @@ ngramsViewCpt = R.hooksComponentWithModule thisModule "ngramsView" cpt
]
]
]
]
, getChartFunction chartType $ { path: params, session }
, getChartFunction chartType $ { path: params, session }
-}
]
]
charts params _ _ _ = [ chart params mode ]
charts params _ _ _ = [ chart params mode ]
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment