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
152
Issues
152
List
Board
Labels
Milestones
Merge Requests
1
Merge Requests
1
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
gargantext
purescript-gargantext
Commits
e52647f9
Verified
Commit
e52647f9
authored
Nov 22, 2024
by
Przemyslaw Kaminski
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
[refactor] some code cleanup
Triggers was an old concept, it has been long replaced by Toestand
parent
15a3dfbf
Changes
5
Hide whitespace changes
Inline
Side-by-side
Showing
5 changed files
with
1 addition
and
90 deletions
+1
-90
BaseModal.js
src/Gargantext/Components/Bootstrap/Floaty/BaseModal.js
+1
-1
DocsTable.purs
src/Gargantext/Components/DocsTable.purs
+0
-5
Tree.purs
src/Gargantext/Components/NgramsTable/Tree.purs
+0
-5
Texts.purs
src/Gargantext/Components/Nodes/Texts.purs
+0
-45
Types.purs
src/Gargantext/Components/Nodes/Texts/Types.purs
+0
-34
No files found.
src/Gargantext/Components/Bootstrap/Floaty/BaseModal.js
View file @
e52647f9
...
...
@@ -9,7 +9,7 @@
export
function
_show
(
window
,
querySelector
,
events
)
{
let
$modal
=
window
.
$
(
querySelector
);
$modal
.
modal
(
'show'
);
console
.
log
(
'events'
,
events
);
//
console.log('events', events);
if
(
events
.
onHide
)
{
$modal
.
on
(
'hidden.bs.modal'
,
events
.
onHide
());
}
...
...
src/Gargantext/Components/DocsTable.purs
View file @
e52647f9
...
...
@@ -709,11 +709,6 @@ docChooserCpt = here.component "docChooser" cpt
variant = selected ? Info $ Dark
onClick sel _ = do
-- here.log2 "[docChooser] onClick, listId" listId
-- here.log2 "[docChooser] onClick, corpusId" corpusId
-- here.log2 "[docChooser] onClick, nodeId" nodeId
-- R2.callTrigger triggerAnnotatedDocIdChange { corpusId, listId, nodeId }
-- T2.reload tableReload
if sel then do
T.write_ Nothing sidePanelTexts
T.write_ Closed sidePanelState
...
...
src/Gargantext/Components/NgramsTable/Tree.purs
View file @
e52647f9
...
...
@@ -463,11 +463,6 @@ ngramsContextCpt = here.component "ngramsContext" cpt where
variant = selected ? Info $ Dark
onClick sel _ = do
-- here.log2 "[docChooser] onClick, listId" listId
-- here.log2 "[docChooser] onClick, corpusId" corpusId
-- here.log2 "[docChooser] onClick, nodeId" nodeId
-- R2.callTrigger triggerAnnotatedDocIdChange { corpusId, listId, nodeId }
-- T2.reload tableReload
if sel then do
T.write_ Nothing sidePanelLists
T.write_ GT.Closed sidePanelState
...
...
src/Gargantext/Components/Nodes/Texts.purs
View file @
e52647f9
...
...
@@ -397,51 +397,6 @@ textsSidePanelCpt = here.component "textsSidePanel" cpt where
sidePanelState' <- R2.useLive' sidePanelState
sidePanelTexts' <- R2.useLive' sidePanelTexts
-- R.useEffect' $ do
-- let toggleSidePanel' _ = snd sidePanelState toggleSidePanelState
-- triggerSidePanel' _ = snd sidePanelState $ const Opened
-- R2.setTrigger toggleSidePanel toggleSidePanel'
-- R2.setTrigger triggerSidePanel triggerSidePanel'
-- (mCorpusId /\ setMCorpusId) <- R.useState' Nothing
-- (mListId /\ setMListId) <- R.useState' Nothing
-- (mNodeId /\ setMNodeId) <- R.useState' Nothing
-- R.useEffect3 mCorpusId mListId mNodeId $ do
-- if mCorpusId == Just corpusId && mListId == Just listId && mNodeId == Just nodeId && mCurrentDocId == Just nodeId then do
-- T.modify_ (\sp -> sp { mCurrentDocId = Nothing }) sidePanelTexts
-- else do
-- T.modify_ (\sp -> sp { mCorpusId = Just corpusId
-- , mCurrentDocId = Just nodeId
-- , mListId = Just listId
-- , mNodeId = Just nodeId }) sidePanelTexts
-- let trigger :: Record TriggerAnnotatedDocIdChangeParams -> Effect Unit
-- trigger { corpusId, listId, nodeId } = do
-- log2 "[sidePanel trigger] trigger corpusId change" corpusId
-- log2 "[sidePanel trigger] trigger listId change" listId
-- log2 "[sidePanel trigger] trigger nodeId change" nodeId
-- if mCorpusId == Just corpusId && mListId == Just listId && mNodeId == Just nodeId && mCurrentDocId == Just nodeId then do
-- R.setRef currentDocIdRef Nothing
-- T.modify_ (\sp -> sp { mCurrentDocId = Nothing }) sidePanelTexts
-- R2.callTrigger toggleSidePanel unit
-- else do
-- setMCorpusId $ const $ Just corpusId
-- setMListId $ const $ Just listId
-- setMNodeId $ const $ Just nodeId
-- R.setRef currentDocIdRef $ Just nodeId
-- R2.callTrigger triggerSidePanel unit
-- T.modify_ (\sp -> sp { mCorpusId = Just corpusId
-- , mCurrentDocId = Just nodeId
-- , mListId = Just listId
-- , mNodeId = Just nodeId }) sidePanelTexts
-- log2 "[sidePanel] trigger" trigger
-- R2.setTrigger triggerAnnotatedDocIdChange trigger
-- pure unit
-- pure $ do
-- -- log "[sidePanel] clearing triggerAnnotatedDocIdChange"
-- R2.clearTrigger triggerAnnotatedDocIdChange
let closeSidePanel _ = do
-- T.modify_ (\sp -> sp { mCurrentDocId = Nothing
-- , state = Closed }) sidePanelTexts
...
...
src/Gargantext/Components/Nodes/Texts/Types.purs
View file @
e52647f9
...
...
@@ -23,40 +23,6 @@ type TriggerAnnotatedDocIdChangeParams = (
, nodeId :: NodeID
)
type SidePanelTriggers = (
currentDocIdRef :: R.Ref (Maybe Int)
, toggleSidePanel :: R2.Trigger Unit -- toggles side panel
, triggerAnnotatedDocIdChange :: R2.Trigger (Record TriggerAnnotatedDocIdChangeParams)
, triggerSidePanel :: R2.Trigger Unit -- opens side panel
)
emptySidePanelTriggers :: R.Hooks (Record SidePanelTriggers)
emptySidePanelTriggers = do
currentDocIdRef <- R.useRef Nothing
toggleSidePanel <- R.useRef Nothing
triggerAnnotatedDocIdChange <- R.useRef Nothing
triggerSidePanel <- R.useRef Nothing
pure $ {
currentDocIdRef
, toggleSidePanel
, triggerAnnotatedDocIdChange
, triggerSidePanel
}
type TextsLayoutControls = (
triggers :: Record SidePanelTriggers
)
initialControls :: R.Hooks (Record TextsLayoutControls)
initialControls = do
triggers <- emptySidePanelTriggers
pure $ {
triggers
}
type SidePanel =
(
...
...
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